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This publication is intended for application programmers who are 
writing programs in assembler language; it contains a brief 
description of each macro instruction and a description of each 
operand that can be specified in a macro instruction. Descriptions 
of the macro instructions for the following data management access 
methods are contained in this publication. 

Basic Direct Access Method (BDAM) 

Basic Indexed Sequential Access Method ( BISAM) 

Basic Partitioned Access Method ( BPAM) 

Basic Sequential Access Method ( BSAMI 

Queued Indexed Sequential Access Method (QISAM) 









Queued Sequential Access Method ( QgAM) 

This publication does not contain descriptions of macro instructions 
for specialized application programs such as teleprocessing, graphics, 
magnetic character readers, optical character reader-sorters, optical 
character readers, or the time sharing option (TSO). 

Before using this publication to code macro instructions, you should 
be f amiliar with the information contained in OS Data 
Management Services Guide. 
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Second Edition (June 1973) 

This edition replaces the previous edition (numbered GC26-3794-0) and makes that edition obsolete. 

This edition applies to OS Release 21.7. It contains the data management macro instructions that 
were previously described in IBM System/360 Operating System: Supervisor and Data Management 
Macro Instructions, GC28-6647-5, which is now obsolete. Supervisor macro instructions are now 
described in OS Supervisor Services and Macro Instructions, GC28-6646. 

Significant system changes are summarized under "Summary of Amendments" following the list of 
figures. Each technical change is marked by a vertical line to the left of the change. 

Information in this publication is subject to significant change. Any such changes will be published in 
new editions or technical newsletters. Before using this publication, consult the latest IBM 
System/ 3 60 and System/ 3 70 Bibliography, GA22-6822, and the technical newsletters that amend that 
bibliography, to learn which editions and technical newsletters are applicable and current. 

Requests for copies of IBM publications should be made to the IBM branch office that serves you. 

Forms for readers' comments are provided at the back of the publication. If the forms have been 
removed, comments may be addressed to IBM Corporation, Programming Center — Publishing, 
Department D58, Monterey and Cottle Roads, San Jose, California 95193. 
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This publication contains descriptions and definitions for the data management macro 
instructions available in the assembler language. When used with OS Data 
Mana gemsM Sen**™ &dde this publication provides application programmers who 
^re coding programs in assembler language with the necessary information to code the 
macro instructions. 
This publication is divided into the following parts: 

"Introduction," which contains a general description of macro instructions, the 

rules to be followed when macro instructions are coded, and a description of the 

notational conventions used throughout the publication. 

"Macro Instruction Descriptions," which describes the function of each macro 

instruction and defines how each macro instruction is to be coded. The macro 

instructions are presented in alphabetic order with each macro instruction 

beginning on a right-hand page. The standard form of each macro instruction is 

described first, followed by the description of the list and execute form 

instructions; the list and execute forms are available only for those macro 

instructions that pass parameters in a list. 

"Appendix A: Status Information Following an Input/Output Operation," which 

includes information about error indications available following an input/output 

operation. 

"Appendix B: Data Management Macro Instructions Available by Access 

Method," which lists the macro instructions available for each of the data 

management access methods. 

"Appendix C: Device Capacities," which lists device capacities that can be used 

as a guide when coding the blocksize and logical record length operands in the 

DCB macro instruction. 

"Appendix D: DCB Exit List Format and Contents," which describes the format 

and content of the data control block exit list. 

"Appendix E: Control Characters," which contains information about the control 

characters used to control spacing and skipping (printers) and stacker selection 

(card read punch or card punch). 

"Index," which provides topic references to information in this book. 



Prerequisite Publications 

Before programs are coded using data management macro instructions, the user should 

be familiar with the information contained in the following publications: 

OS Assembler Language, GC28-6514 

OS Data Management Services Guide, GC26-3746 

OS Introduction, GC28-6534 

OS Supervisor Services and Macro Instructions, GC28-6646 
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Related Macro Instruction Publications \^ 

The following publications contain descriptions of macro instructions for specialized 
applications such as teleprocessing, graphics, and magnetic/optical character 
recognition devices: 
OS BTAM, GC30-2004 

OS Data Management Macros and Services for IBM 1285, 1287, and 1288 
Optical Readers, GC2 1-5004 

OS Data Management Services and Macro Instructions for IBM 1419/1275, 
GC21-5O06 

OS GPS for IBM 2250 Display Unit, GC27-6909 

OS GPS for IBM 2260 Display Station (Local Attachment), GC27-6912 

OS GPS for IBM 2280 and 2282 Film Units, GC27-6927 * 

OS QTAM MCP, GC30-2005 

Related System Publications * 

The following publications contain additional information about the operating system. 

Depending on the requirements of the individual installation, an application 

programmer may need these publications to code programs for the data management 

access methods. 

OS Advanced Checkpoint /Restart, GC18-6708 

OS Data Management for System Programmers, GC28-6550 

OS Job Control Language Reference, GC28-6704 ^ 

OS Linkage Editor and Loader, GC28-6538 ( 

OS Programmer's Guide to Debugging, GC28-6670 

OS System Control Blocks, GC28-6628 

OS Utilities, GC28-6586 
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SUMMARY OF AMENDMENTS 

Release 21.7 

New Devices . . 

Release 21.7 supports the new 3333 Disk Storage. Capacity data for this device has 

been added to the tables in Appendix C. 

Miscellaneous Changes 

Descriptions of the CHKPT and WAIT macro instructions have been added to this 
book. The CHKPf macro instruction was formerly described in OS Supervisor 
Services and Macro Instructions, GC28-6646. The WAIT macro instruction is a 
duplication of the macro as described in OS Supervisor Services and Macro 
Instructions. 

Additional changes were made to: 

Clarify the description of the temporary close (TYPE=T) option (CLOSE macro 

instruction). 

Redefine the contents of register 1 when control is passed to an exit routine (see 

Appendix D). 

Expand the description of the LEAVE option (FEOV macro instruction for 
BSAM and QSAM). 

Add a completion code that indicates a backspacing request was ignored on a 
SYSIN or SYSOUT data set (BSP macro instruction). 

Specify that the return code from SYNADAF is in register rather than register 
15. 

Expand the definition of the Z byte, which indicates where the system found a 
directory entry (BLDL macro instruction). 

Delete tape labels as a source of buffer alignment information (BFALN parameter 
of the DCB macro instruction for all access methods). 

Minor technical changes have been made to the BUILDRCD, CHECK, CLOSE, 
CNTRL, DCB (for all access methods), OPEN, POINT, PRTOV, PUTX, READ, 
SETL, SETPRT, STOW, SYNADAF, and WRITE (BISAM) macro instructions. 

Release 21 

Organization of the Publication Changed 

The organization of the IBM System/360 Operating System: Supervisor and Data 
Management Macro Instructions publication has been changed as follows: 

Supervisor macro instructions are now contained in the OS Supervisor Services 
and Macro Instructions publication, GC28-6646. These macro instructions 
include: ABEND, ATTACH, CALL, CHAP, CHKPT, DELETE, DEQ, 
DETACH, DOM, DXR, ENQ, EXTRACT, FREEMAIN, GETMAIN, 
IDENTIFY, LINK, LOAD, POST, RETURN, SAVE, SEGLD, SEGWT, SNAP, 
SPIE, STAE, STIMER, TIME, TTIMER, WAIT, WAITR, WTL, WTO, WTOR, 

andXCTL. 
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• Macro instructions for the time sharing option (TSO) are now contained in the 
OS Time Sharing Option Guide to Writing a Terminal Monitor Program or l l 
a Command Processor, GC28-6764. These macro instructions include: ^ 
GTSIZE, RTAUTOPT, SPAUPOPT, STATUS, STAUTOCP, STAUTOLN, 

STAX, STBREAK, STCC, STCLEAR, STCOM, STSIZE, STTIMEOU, 
TCLEARQ, TGET, and TPUT. 

• Data management macro instructions are included in this publication. These 
macro instructions include: BLDL, BSP, BUILD, BUILDRCD, CHECK, 
CLOSE, CNTRL, DCB, DCBD, ESETL, FEOV, FIND, FREEBUF, 
FREEDBUF, FREEPOOL, GET, GETBUF, GETPOOL, NOTE, OPEN, 
POINT, PRTOV, PUT, PUTX, READ, RELEX, RELSE, SETL, SETPRT, 
STOW, SYNADAF, SYNADRLS, TRUNC, WRITE, and XLATE. 

DCB Macro Instruction Described by Access Method 

The description of the DCB macro instruction has been rewritten by access method; f 

separate descriptions are included for BDAM, BISAM, BPAM, BSAM, QISAM, and 

QSAM. 

* 
Addition of New Card Reader and Card Punch: New Programming Feature 

The programming support for the 3505 card reader and 3525 card punch are included 
in this edition. The macro instructions changed to support these two devices are 
CLOSE, CNTRL, DCB (BSAM and QSAM), OPEN and PRTOV. 

Additional Problem Program Exit Provided: New Programming Feature 

An additional problem program exit is provided to allow the problem program to 

attempt error recovery or ignore or delay abnormal termination when an ABEND 

condition occurs during open, close, or end-of-volume processing. /" 

DOS /OS Tape Data Set Compatibility: New Programming Feature ^ ' 

The DOS/OS Interchange feature allows the operating system to recognize and bypass 
embedded checkpoint records written in DOS tape data sets. The macro instructions 
changed to support this feature are CNTRL and POINT (also see the OPTCD operand 
for BSAM and QSAM for the OPTCD that is supplied in the DD statement for the 
data set). 

Additional Information Added 

Three appendixes have been added to aid in coding programs: 

• Appendix C contains device capacities to aid in determining maximum record *■' 
length or blocksize for various input /output devices. This information can also be 

used to determine the optimum blocking factor when blocked records are used. 

• Appendix D contains the format of the problem program exit list. This appendix 
shows the hexadecimal code for each type of exit and a brief description of exit 
list processing. 

• Appendix E contains a description of the control characters that can be used for 
stacker selection or printer spacing and skipping. 

Miscellaneous Changes 

• The format of the publication has been changed to aid in coding operands. The 
description of each operand includes the type of notation that can be used when 
the macro instruction operand is coded. 
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Macro instructions that require a data control block address for an open data set 
have been clarified to indicate that the data set must be open. 

Clarification for the following macro instructions hasten included: 

BLDL, BUILDRCD, CHECK, CLOSE, ESETL, FREEPOOL GET .NOTE, 

OPEN, POINT, PRTOV, PUT, READ, RELEX, STOW, and WRITE. 
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INTRODUCTION 

Data Management Macro Instructions 

A set of macro instructions is provided by IBM for communicating service requests to 
the data management access method routines. These macro instructions are available 
only when the assembler language is being used, and they are processed by the 
assembler program using macro definitions supplied by IBM and placed in the macro 
library when the operating system is generated. 

The processing of the macro instruction by the assembler program results in a macro 
expansion, generally consisting of executable instructions and data in the form of 
assembler-language statements. The data fields are the parameters to be passed to the 
access method routine; the executable instructions generally consist of a branch around 
the data fields, instructions to load registers, and either a branch instruction or 
supervisor call (SVC) to give control to the proper program. The exact macro 
expansion appears as a part of the assembler listing. 

A listing of a macro definition from SYS1.MACLIB (the library in which macro 
definitions are stored) can be obtained by using the utility program IEBPTPCH, which 
is described in the OS Utilities publication. 

Before macro instructions are coded using this publication, the user should be familiar 
with the information contained in the OS Data Management Services Guide. 

When programs that request supervisor services are being coded, the user should be 
familiar with the information contained in the OS Supervisor Services and Macro 
Instructions publication. 

When programs are being coded for more specialized applications such as 
teleprocessing, graphics, and character recognition, the publication that describes the 
specific access method and/or device type should be used. Publications containing 
descriptions of the macro instructions for teleprocessing, graphics, and character 
recognition devices are listed in the preface of this publication. 

The operation of some macro instructions depends on the options selected when the 
macro instruction is coded. For these macro instructions, either separate descriptions 
are provided or the differences are listed within a single description. If no differences 
are explicitly listed, none exist. The description of each macro instruction starts on a 
right-hand page; the descriptions that do not apply to the access methods being used 
can be removed. Appendix B provides a list of the macro instructions available for 
each access method. 
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The symbols [ ], { }, and ,... a re used in this publication to help define the macro 
instructions. These symbols are not coded; they are only to indicate how a macro 
instruction may be written; their general definitions are given below: 

If more than one item is enclosed in brackets, one or none of the items may be coded. 
For example, if this is shown 

[REREAD] 
[,LEAVE] 

you may code REREAD or LEAVE, or neither REREAD nor LEAVE. 



Introduction 1 



One of the operands from the vertical stack within braces must be coded, depending on 
which of the associated services is desired. For example, if this is shown 

{INPUT} 
{OUTPUT} 

you must code either INPUT or OUTPUT, but not both INPUT and OUTPUT. 

indicates that more than one set of operands may be designated in the same 
macro instruction. 

Coding Macro Instructions 

Data management macro instructions are written in the assembler language and, as 
such, are subject to the rules contained in the OS Assembler Language publication. 
Data management macro instructions, like all assembler language instructions, are 
written in the following format: 



Name 


Operation 


Operands 


Comments 


symbol 

or 

blank 


Macro name 


None, one or more operands separated 
by commas 





The operands are used to specify services and options to be used and are written 
according to the following general rules: 

• If the selected operand is shown in bold capital letters (for example, 
MACRF=WL), code the operand exactly as shown. 

• If the selected operand is a character string in bold type (for example, if the type 
operand of a READ macro instruction is SF), code the operand exactly as shown. 

• If the operand is shown in italic lowercase letters (for example, deb address), 
substitute the indicated address, name, or value. 

If the operand is a combination of bold capital letters and italic lowercase letters 
(for example, LRECL=absexp), code the capital letters and equal sign exactly as 
shown and substitute the appropriate address, name, or value for the italic 
lowercase letters. 

• Commas and parentheses are coded exactly as shown, except that the comma 
following the last operand coded should be omitted. The use of commas and 
parentheses is indicated by brackets and braces in the same manner as brackets 
and braces indicate the use of operands. 

• Several macro instructions contain the designation *S\ This operand, when used, 
must have the apostr ophe on both sides of the S. 

When substitution of a name, value, or address is required, the notation used to specify 
the operand depends on the operand being coded. The following shows two examples 
of the notations used to indicate how an operand can be coded. 

DDNAME=symbol 

In the above example, the only type of operand that can be coded is a valid 
assembler-language symbol. 
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deb address— RX-Type Address, (2-12), or (1) 

In the above example, the operand that can be substituted can be an RX-type address, 

any of the general registers 2 through 12, or general register 1. 

The following describes the meaning of each notation used to show how an operand 

can be coded. 

symbol. 

When this notation is shown, the operand can be any valid assembler-language symbol. 

d ecimal digit 

When this notation is shown, the operand can be any decimal digit up to the maximum 

value allowed for the specific operand being described. 

(2-12) 

When this notation is shown, the operand specified can be any of the general registers 
2 through 12. All rasters as grands musf bf rcA?A ™ narentheses: for example, it 
register 3 is coded, it is coded as (3). When one of the registers 2 through 12 is used, 
it can be coded as a decimal digit, symbol (equated to a decimal digit), or an expression 
that results in a value of 2 through 12. 

0)_ 

When this notation is shown, general register 1 can be used as an operand When used 
as an operand in a macro instruction, the register must be specified as the decimal digit 
1 enclosed in parentheses as shown above. 

(0) 
"Wh7n this notation is shown, general register can be used as an operand When used 
as an operand in a macro instruction, the register must be specified as the decimal digit 
enclosed in parentheses as shown above. 

RX-Ty pe Address 

When this notation is shown, the operand can be specified as any valid 
assembler-language RX-type address. The following shows examples of each valid 
RX-type address: 
Name Operation Operand 

ALPHA1 L 1,39(4,10) 

ALPHA2 L REG1,39(4,TEN) 

BETA1 L 2,ZETA(4) 

BETA2 L REG2,ZETA(REG4) 

GAMMA1 L 2,ZETA 

GAMMA2 L REG2.ZETA 

GAMMA3 L 2,=F1000' 

LAMBDA1 L 3,20(,5) 

Both ALPHA instructions specify explicit addresses; REG1 and TEN are absolute , 
svmbols. Both BETA instructions specify implied addresses, and both use index 



rogSere . Indexing is omitted from the GAMMA instructions. GAMMA1 and 
GAMMA2 specify i mplied addresses. The second operand of GAMMA3 is a literal. 
LAMBDA1 specifies an e xplicit address with no indexing . 
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A-Type Address 

— f x 

When this notation is shown, the operand can be specified as any address that can be (^ ^ 

written as a valid assembler-language A- type address constant. An A-type address 

constant can be written as an absolute value, a relocatable symbol, or relocatable 

expression. Operands that require an A-type address are inserted into an A-type 

address constant during the macro expansion process. For more details about A-type 

address constants, refer to the OS Assembler Language publication. 



When this notation is shown, the operand can be an absolute value or expression. An 
absolute expression can be an absolute term or an arithmetic combination of absolute 
terms. An absolute term can be a non-relocatable symbol, a self-defining term, or the 
length attribute reference. For more details about absolute expressions, refer to the 
OS Assembler Language publication. 



When this notation is shown, the operand can be a relocatable symbol or expression. 
A relocatable symbol or expression is one whose value changes by n if the program in 
which it appears is relocated n bytes away from its originally assigned area of storage. 
For more details about relocatable symbols and expressions, refer to the OS Assembler 
Language publication. 

Rules for Register Usage 

Many macro instruction expansions include instructions that use a base register 
previously defined by a USING statement. The USING statement must establish 
addressability so that macro expansion can include a branch around the in line 
parameter list, if present, and refer to data fields and addresses specified in the macro 
instruction operands. 



Macro instructions that use a BAL or BALR instruction to pass control to an access 
method routine, normally require that register 13 contain the address of an 18-word 
register-save area. The READ, WRITE, CHECK, GET, and PUT macro instructions 
are of this type. 

Macro instructions that use a supervisor call (SVC) instruction to pass control to an 
access method routine may modify general registers 0, 1, 14, and 15 without restoring 
them. Unless otherwise specified in the macro instruction description, the contents of 
these registers are undefined when the system returns control to the problem program. 

When an operand is specified as a register, the problem program must have inserted the 
value or address to be used into the register as follows: 

• If the register is to contain a Yalue, it must be placed in the low-order poption of 
the registe r unless the macro instruction description states otherwise. Any unused 
r bitsjn the regi ster should be set to zero. "" 

• If the register is to contain an address, the address must be placed in the 
low -ord er three bytes of the register, and the high-order byte of the register 
should be set to zero. 
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Rules for Continuation Lines 

The operand field of a macro instruction can be continued on one or more additional 

lines as follows: 

1. Enter a continuation character (not blank, and not part of the operand coding) in 
column 72 of the line. 

2. Continue the operand field on the next line, starting in column 16. All columns 
to the left of column 16 must be blank. 

The operand field being continued can be coded in one of two ways. The operand 
field can be coded through column 71, with no blanks, and continued in column 16 of 
the next line, or the operand field can be truncated by a comma, where a comma 
normally falls, with at least one blank before column 71, and then continued in column 
16 of the next line. An example of each method is shown in the following illustration: 

Name Operation Operand Comments 

NAME 1 OP 1 OPERAND 1 , OPERAND2 , OPERAND3 , OPERAND4 , OPERAND5 , OPERANDS , OPERAND? , OPEX 
RAND8 THIS IS 0NE WAY 

NAME2 OP2 OPERANDI ,OPERAND2, THIS IS ANOTHER WAY X 

OPERAND3 , X 

OPERAND4 
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BLDL 



BLDL— Build a Directory Entry List (BPAM) 



The BLDL macro instruction is used to complete a list of information from the 
directory of a partitioned data set. The problem program must supply an area in main 
storage; the area must include information about the number of entries in the list, the 
length of each entry, and the name of each data set member (or alias) before the 
BLDL macro instruction is issued. Data set member names in the list must be in 
alphameric order. All read and write operations using the same data control block must 
have been tested for completion before the BLDL macro instruction is issued. 

The BLDL macro instruction is written as follows: 



[symbol] 



BLDL 



deb address, list address 



%J 



deb address— RX-type Address, (2-12), (1), or the Decimal Digit 

The deb address operand specifies the address of the data control block for an 
open partitioned data set, or zero can be specified to indicate that the data set is 
in a job library, step library, or link library. 

list address— RX-Type Address, (2-12), or (0) 

The list address operand specifies the main storage address of the list to be 
completed when the BLDL macro instruction is issued. The list address must be 
on a halfword boundary. The following illustration shows the format of the list: 



List 
Address 



Length 
(bytes) 



List 

Description 

Field 



List 

Entry (LL bytes) 



or 

More 

Entries (FF total) 



FF 



LL 



NAME 1 



TTR K 





USER DATA 



NAME 2 




8 



3 111 



to 62 



FF 



LL 



NAME 



This field must contain a binary value indicating the total number of 
entries in the list. 

This field must contain a binary value indicating the length, in bytes, of 
each entry in the list (must be an even number of bytes). If the exact 
length of the entry is known, specify the exact length. Otherwise, 
specify at least 58 bytes (decimal) if the list is to be used with an 
ATTACH, LINK, LOAD, or XCTL macro instruction. The minimum 
length for a list is 12 bytes. 

This field must contain the member name or alias to be located. The 
name must start in the first byte of the name field and be padded to the 
right with blanks (if necessary) to fill the 8-byte field. 
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When the BLDL macro instruction is executed, five fields of the directory entry 
list are filled in by the system. The specified length (LL) must be at least 14 to 
fill in the Z and C fields. If the LL field is 12, only the NAME, TT, R, and K 
fields are returned. The five fields are: 



TT 



R 



K 



Indicates the relative track number where the beginning of the data set 
member is located. 

Indicates the relative block (record) number on the track indicated by 
TT. 

Indicates the concatenation number of the data set. 
data set, this value is zero. 



For the first or only 



Z Indicates where the system found the directory entry: 

Private library 

1 Link library 

2 Job, task, or step library 

3-255 Job, task, or step library of parent task n, where n = Z-2 

C Indicates the type (member or alias) for the name, the number of note 

list fields (TTRNs), and the length of the user data field (indicated in 
halfwords). The following describes the meaning of the eight bits: 

Bit 0=0 Indicates a member name. 

Bit 0=1 Indicates an alias. 

Bits 1-2 Indicate the number of TTRN fields (maximum of three) in 

the user data field. 
Bits 3-7 Indicate the total number of halfwords in the user data field. 

If the list entry is to be used with an ATTACH, LINK, 

LOAD, or XCTL macro instruction, the value in bits 3 

through 7 is 22 (decimal). 

USER DATA The user data field contains the user data from the directory entry. 
If the length of the user data field in the BLDL list is equal to or greater 
than the user data field of the directory entry, the entire user data field is 
entered into the list. Otherwise, the list contains only the user data for 
which there is space. 



Completion Codes 



When the system returns control to the problem program, the low-order byte of register 
15 contains one of the following return codes; the three high-order bytes of register 15 
are set to zero. 

Hexadecimal Meaning 
Code 

00 Successful completion. 

04 One or more entries in the list could not be filled; the list supplied may 

be invalid. If a search is attempted but the entry is not found, the R field 
(byte 11) for that entry is set to zero. 

08 A permanent input/output error was detected when the system attempted 

to search the directory. 
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BSP 

BSP— Backspace a Physical Record (BSAM— Magnetic Tape and Direct Access 
Only) 

The BSP macro instruction causes the current volume to be backspaced one data block 
(physical record). All input and output operations must be tested for completion 
before the BSP macro instruction is issued. The BSP macro instruction should not be 
used if the CNTRL, NOTE, or POINT macro instructions are being used. 

Magnetic Tape: A backspace is always made toward the load point. 

Direct Access: A BSP macro instruction must not be issued for a data set created by 
using track overflow. 

I With SYSIN or SYSOUT data sets, a BSP macro instruction is ignored but a 
I completion code is returned. 

The BSP macro instruction is written as follows: 



[symbol J 



BSP 



deb address 






deb address— RX-Type Address, (2-12), or (1) 

The deb address operand specifies the address of the data control block for the 
volume to be backspaced. The data set on the volume to be backspaced must be 
opened before issuing the BSP macro instruction. 

Completion Codes 

When the system returns control to the problem program, the low-order byte of register 
15 contains one of the following return codes; the three high-order bytes of register 15 
are set to zero. 

Hexadecimal Meaning 
Code 

00 Successful completion 

04 Unsuccessful completion (includes encountering a tapemark or beginning 

of an extent) 

I 08 A backspacing request was ignored on a SYSIN or SYSOUT data set 
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BUILD 

BUILD— Build a Buffer Pool (BDAM, BISAM, BPAM, BSAM, QISAM, and 
QSAM) 

The BUILD macro instruction is used to construct a buffer pool in a main-storage area 
provided by the problem program. The buffer pool may be used by more than one 
data set through separate data control blocks. Individual buffers are obtained from the 
buffer pool using the GETBUF macro instruction, and buffers are returned to the 
buffer pool using a FREEBUF macro instruction. Refer to the OS Data Management 
Services Guid e for an explanation of the interaction of the DCB, BUILD, and 
GETBUF macro instructions in each access method, as well as the buffer size 
requirements. 

The BUILD macro instruction is written as follows: 



o 



[symbol] 



BUILD 



i address, J number of buffers, buffer length 
1 (0) 



area address— KX-Ty^t Address, (2-12), or (1) 

The area address operand specifies the address of the main-storage area to be 
used as a buffer pool. The area must start on a fullword boundary. The 
following illustration shows the format of the buffer pool: 



Area - 
Address u 



Buffer Poo! 

Control 

Block 



8 bytes - 



Buffer 



Buffer 
Length 



Buffer 



Buffer 
Length 



Area Length 



Area Length=( Buffer Length) x (Number of Buffers) + 8 

number of buffers— symbol, decimal digit, absexp, or (2-12) 

The number-of-buffers operand specifies the number of buffers in the buffer pool 
up to a maximum of 255. 
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buffer length — symbol, decimal digit, absexp, or (2-12) 

The buffer length operand specifies the length, in bytes, of each buffer in the 
buffer pool. The value specified for the buffer length must be a fullword 
multiple; otherwise the system rounds the value specified to the next higher 
fullword multiple. The maximum length that can be specified is 32,760 bytes. 
For QSAM, the buffer length must be at least as large as the value specified in 
the blocksize (DCBBLKSI) field of the data control block. 

(0) — Coded as shown 

The number of buffers and buffer length can be specified in general register 0. If 
(0) is coded, register must contain the binary values for the number of buffers 
and buffer length as shown in the following illustration. 



( 






Bits: 



Register 










Number of Buffers 


Buffer Length 





15 


16 




31 
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BUILDRCD 



BUILDRCD — Build a Buffer Pool and a Record Area (QSAM) 



The BUILDRCD macro instruction causes a buffer pool and a record area to be 
constructed in a user-provided storage area. The macro is used only for 
variable-length, spanned records processed in QSAM locate mode. Use of this macro 
before the data set is opened, or before the end of the DCBEXIT routine, will 
automatically invoke a logical-record interface rather than a segment interface for 
variable-length, spanned records. 

The standard form of the BUILDRCD macro instruction is written as follows (the list 
and execute forms are shown following the description of the standard form): 



[symbol] 



BUILDRCD 



area address, number of buffers, buffer length, 
record area address [, record area length] 



area address — A-Type Address or (2-12) 

The area address operand specifies the address of the main-storage area to be 
used as a buffer pool. The area must start on a fullword boundary. The 
following illustration shows the format of the buffer pool: 



o 



Area 
Address 












— j ( — 




BUFAD 


BUFLG 


BUFNO 


BUFLTH 


BUFRECAD 


Buffer 


i 


Buffer 


Address of First 
Available Buffer 


Flags 


No. of 
Buffers 
Req'd 


Length of 

Each 

Buffer 


Address 
of Record 
Area 






121: 




Buffer 

■+ ► 




Buffer 

-4 ». 


M — 

M _ 




)ytes- 

Area Length 


Length 




Length 

». 



Area Length=( Buffer Length) x (Number of Buffers) + 12 



The buffer control block contains the address of the record area and a flag that 
indicates logical-record interface processing of variable-length spanned records. 

number of buffers — symbol, decimal digit, absexp, or (2-12) 

The number of buffers operand specifies the number of buffers, up to a 
maximum of 255, to be in the buffer pool. 

buffer length — symbol, decimal digit, absexp, or (2-12) 

The buffer length operand specifies the length, in bytes, of each buffer in the 
buffer pool. The value specified for the buffer length must be a fullword 
multiple; otherwise, the system rounds the value specified to the next higher 
fullword multiple. The maximum length that can be specified is 32,760. 
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record area address — A-Type Address or (2-12) 

The record area address operand specifies the address of the main-storage area 
to be used as a record area. The area must start on a doubleword boundary and 
have a length of the maximum logical record (LRECL) plus 32 bytes. 

record area length — symbol, decimal digit, absexp, or (2-12) 

The record area length operand specifies the length of the record area to be 
used. The area must be as long as the maximum length logical record plus 32 
bytes for control information. If the record area length operand is omitted, the 
problem program must store the record area length in the first four bytes of the 
record area. 

Note: It is the user's responsibility to release the buffer pool and the record area after 
a CLOSE macro instruction has been issued for all the data control blocks using the 
buffer pool and the record area. 
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BUILDRCD— List Form 
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The list form of the BUILDRCD macro instruction is used to construct a program 
parameter list. The description of the standard form of the BUILDRCD macro 
instruction provides the explanation of the function of each operand. The description 
of the standard form also indicates which operands are totally optional and those 
required in at least one of the pair of list and execute forms. The format description 
below indicates the optional and required operands in the list form only. 

The list form of the BUILDRCD macro instruction is written as follows: 



[symbol] 



BUILDRCD 



area address, number of buffers, buffer length, 
record area address[, record area length] 
, MF=L 



area address — A-Type Address 

number of buffers— symbol, decimal digit, or absexp 

buffer length — symbol decimal digit, or absexp 

record area address — A-Type Address 

record area length — symbol, decimal digit, or absexp 

MF=L — Coded as shown 

The MF=L operand specifies that the BUILDRCD macro instruction is used to 
create a control program parameter list that will be referenced by an execute form 
instruction. 

Note: A control program parameter list can be constructed by coding only the MF=L 
operand (without the preceding comma); in this case, the list is constructed for the 
area address, number of buffers, buffer length, and record area address operands. 
If the record area length operand is also required, the operands can be coded as 
follows: 



[symbol] BUILDRCD „„0,MF = L 

The preceding example shows the coding to construct a list containing address 
constants with a value of in each constant. The actual values can then be supplied by 
the execute form of the BUILDRCD macro instruction. 
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BUILDRCD— Execute Form 



BUILDRCD — Execute form 



A remote control program parameter list is referred to, and can be modified by, the 
execute form of the BUILDRCD macro instruction. The description of the standard 
form of the BUILDRCD macro instruction provides the explanation of the function of 
each operand. The description of the standard form also indicates which operands are 
totally optional and those required in at least one of the pair of list and execute forms. 
The format description below indicates the optional and required operands for the 
execute form only. 
The execute form of the BUILDRCD macro instruction is written as follows: 




[area address], [number of buffers], 
[buffer length], [record area address!, 
[record area length], 
MF=(E, (control program list address)) 
I (1) J 



area address— RX-Type Address or (2-12) 

number of buffers — absexp 

buffer length — absexp 

record area address —RX-Type Address or (2-12) 

record area length — absexp 

MF=(E, { control program list address }) 
{ (1) } 

This operand specifies that the execute form of the BUILDRCD macro 
instruction is used, and an existing control program parameter list (created by a 
list-form instruction) will be used. The MF= operand is coded as described in 
the following: 

E — Coded as shown 

control program list address— -RX-Type Address, (2-12), or (1) 
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CHECK 

CHECK— Wait for and Test Completion of a Read or Write Operation (BDAM, 
BISAM, BPAM, and BSAM) 

The CHECK macro instruction causes the active task to be placed in the wait 
condition, if necessary, until the associated input or output operation is completed. The 
input or output operation is then tested for errors and exceptional conditions. If the 
* operation is completed successfully, control is returned to the instruction following the 
CHECK macro instruction. If the operation is not complete d successfully , the error 
analysis ( SYNAD) routine is given control or, if no error analysis routine is provided, 
the task is*abnormally terminated. The error analysis routine is discussed in the 
SYNAD operand of the DCB macro instruction. 

The following conditions are also handled for BPAM and BSAM on ly: 

When Reading: Volume switching is automatic. The end-of-data-set (EODAD) routine 
is given control if an input request is made after all the records have been retrieved. 

When Writing: Additional space on the device is obtained when the current space is 
filled and more WRITE macro instructions have been issued. 

For kpam and RS1AM, a CHECK macro instruction must be issued for eac h input and 
output operation, and must be issued in the same order as the READ or WRITE macro 
Instructions were issued for the data set. For BDAM or BISAM, either a CHECK or 
WAIT macro instruction can be used. However, if both a CHECK and WAIT macro 
instruction are used, the CHECK macro instruction must be issued after the WAIT 
macro instruction. 

If the ASCII translation routines are included when the operating system is generated, 
translation can be requested by coding LABEL=(,AL) or (,AUL) in the DD statement, 
or it can be requested by coding OPTCD=Q in the DCB macro instruction or DCB 
subparameter of the DD statement. When translation is requested, the Check routine 
automatically translates all BSAM records whose record format (RECFM operand) is 
F, FB, D, DB, or U from ASCII code to EBCDIC code on input. Translation occurs 
as soon as the Check routine determines that the input buffer is full. For translation to 
occur correctly, all input data must be in ASCII code. 

The CHECK macro instruction is written as follows: 



o 



[symbol] 



CHECK 



decb address [ ,DSORG= 



■iu 



decb address — RX-Type Address, (2-12), or (1) 

The decb address operand specifies the address of the data event control block 
created by the associated READ or WRITE macro instruction or used by the 
associated input or output operation. 

DSORG= {IS} 
{ALL} 

The DSORG operand specifies the type of data set organization. 
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The following describes the characters that can be coded. 

IS — Specifies that the program generated is for BISAM use only. 

ALL — Specifies that the program generated is for BDAM, BISAM, 

BPAM, or BSAM use. 

If the DSORG operand is omitted, the program generated is for BDAM, BPAM, or 
BSAM use only. 
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CHKPT 

CHKPT— Take a Checkpoint for Restart Within a Job Step (BDAM, BISAM, 
BPAM, BSAM, QISAM, and QSAM) 

The CHKPT macro instruction establishes a checkpoint for the job step. If the step 
terminates abnormally, it is automatically restarted from the checkpoint. On restart, 
execution resumes with the instruction that follows the CHKPT instruction. If the step 
again terminates abnormally (before taking another checkpoint), it is again restarted 
from the checkpoint. When several checkpoints are taken, the step is automatically 
restarted from the most recent checkpoint. 
Automatic restart from a checkpoint is suppressed if: 

1. The job step completion code is not one of a set of codes specified at system 
generation. 

2. The operator does not authorize the restart. 

3. The restart definition parameter of the JOB or EXEC statement specifies no 
restart (RD=NR) or no checkpoint (RD=NC or RD=RNC). 

4. The CANCEL operand appears in the last CHKPT macro instruction issued 
before abnormal termination. 

Under any of these conditions, automatic checkpoint restart does not occur. Automatic 
step restart (restart from the beginning of the job step) can occur, except under 
condition 1 or 2, or when the job step was restarted from a checkpoint prior to 
abnormal termination. Automatic step restart is requested through the restart definition 
parameter of the JOB or EXEC statement (RD=R or RD=RNC). 

When automatic restart is suppressed or unsuccessful, a deferred restart can be 
requested by submitting a new job. The new job can specify restart from the beginning 
of the job step or from any checkpoint for which there is an entry in the checkpoint 
data set. 

The checkpoint data set contains the information necessary to restart the job step from 
a checkpoint. The control program records this information when the CHKPT macro 
instruction is issued. The macro refers to the data control block for the data set which 
must be on a magnetic tape or direct-access volume. A tape can have standard labels, 
nonstandard labels, or no labels. 

If the checkpoint data set is not open when CHKPT is issued, the control program 
opens the data set and then closes it after writing the checkpoint entry. If the data set 
is physically sequential and is opened by the control program, the checkpoint entry is 
written over the previous entry in the data set, unless the DD statement specifies 
DISP=MOD By writing entries alternately into two checkpoint data sets, it is possible 
to keep the entries for the two most recent checkpoints while deleting those for earlier 
checkpoints. 

The data control block for the checkpoint data set must specify: 

DSORG=PS or PO, RECFM=U or UT, MACRF=(W), BLKSIZE=«««, and 
DDNAME=any name 
where nnn is at least 600 bytes, but not more than 32,760 bytes for magnetic tape and 
not more than the track length for direct access. (If the data set is opened by the 
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control program, blocksize need not be specified; the device-determined maximum 
blocksize is assumed if no blocksize is specified.) For 7-track tape, the data control 
block must specify TRTCH=C; for direct access, it must specify or imply 
KEYLEN=0. To request chained scheduling, OPTCD=C and NCP=2 must be 
specified. With direct access, OPTCD=W can be specified to request validity checking 
for write operations, and OPTCD=WC can be specified to combine validity checking 
and chained scheduling. 

The standard form of the CHKPT macro instruction is written as shown below. 
Information about the list and execute forms follows this description. 



[symbol] 



CHKPT 



deb address 
CANCEL 



/ checkid address 



, checkid length 
,'S' 



]] 



deb address 

The deb address operand specifies the address of the data control block for the 
checkpoint data set. 

checkid address 

The checkid address operand specifies the address of the checkpoint 
identification field. The contents of the field are used when the job step is to be 
restarted from the checkpoint. They are used by the control program in 
requesting operator authorization for automatic restart. You can use it for 
requesting deferred restart. 

If the next operand specifies the length of the field (checkid length), or if it is 
omitted to imply a length of eight bytes, the field must contain the checkpoint 
identification when the CHKPT macro instruction is issued. If the next operand 
is written as 'S', the identification is generated and placed in the field by the 
control program. If both operands are omitted, the control program generates the 
identification, but does not make it available to the problem program. In each 
case, the identification is written in a message to the operator. 

The control program writes the checkpoint identification as part of the entry in 
the checkpoint data set. For a sequential data set, the identification can be any 
combination of up to 16 letters, digits, printable special characters, and blanks. 
For a partitioned data set, it must be a valid member name of up to eight letters 
and digits, starting with a letter. The identification for each checkpoint should be 
unique. 

If the control program generates the identification, the identification is eight bytes 
in length. It consists of the letter C followed by a seven-digit decimal number. 
The number is the total number of checkpoints taken by the job, including the 
current checkpoint, checkpoints taken earlier in the job step, and checkpoints 
taken by any previous job steps. 

checkid length 

The checkid length operand specifies the length in bytes of the checkpoint 
identification field. The maximum length is 16 bytes if the checkpoint data set is 
physically sequential, 8 bytes if it is partitioned. For a partitioned data set, the 
field can be longer than the actual identification, if the unused portion is blank. 
If the operand is omitted, the implied length is eight bytes. 
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CHKPT 



If you code 'S' the control program supplies the checkpoint identification. The 
implied field length is eight bytes. 

CANCEL 

The CANCEL operand cancels the request for automatic restart from the most 
recent checkpoint. If another checkpoint is taken before abnormal termination, 
the job step can be restarted at that checkpoint. 

When control is returned, register 15 contains one of the following return codes: 

Hexadecimal Meaning 
Code 



00 



04 



O 



08 



o 



Successful completion. Code 00 is also returned if the RD parameter 
was coded as RD=NC or RD=RNC to totally suppress the function of 
CHKPT. 

Restart has occurred at the checkpoint taken by the CHKPT macro 
instruction during the original execution of the job. A request for 
another restart of the same checkpoint is normally in effect. If a 
deferred restart was performed and RD=NC, NR, or RNC was 
specified in the resubmitted deck, a request for another restart is not in 
effect. 

Unsuccessful completion. A checkpoint entry was not written, and a 
restart from this checkpoint was not requested. A request for an 
automatic restart from a previous checkpoint remains in effect. 

One of the following conditions exists: 

The parameters passed by the CHKPT macro instruction are 

invalid. 

The CHKPT macro instruction was executed in an exit routine 

other than the end-of-volume exit routine. 

A STIMER macro instruction has been issued, and the time 
interval has not been completed. 

A WTOR macro instruction has been issued, and the reply has 
not been received. 

The checkpoint data set is on a direct-access volume and is full. 
Secondary space allocation was requested and performed. 
(Secondary space allocation is performed for a checkpoint data 
set, but the allocated space is not used. However, had secondary 
allocation not been requested, the job step would have been 
abnormally terminated.) 

In a system with MVT or MFT with subtasking, the job step 
comprises more than one task. 

In a system with MVT, the job step has been allocated storage 
through the rollout/rollin option. 
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• A graphics-type DSORG has been found in an open DCB. 
Graphic devices are not supported in Checkpoint/Restart. 

OC Unsuccessful completion. An uncorrectable error occurred in writing 

the checkpoint entry or in completing queued access method 
input/output operation that were begun before the CHKPT macro 
instruction was issued. A partial, invalid checkpoint entry may have 
been written. If the entry has a programmer-specified checkid, and the 
checkpoint data set is sequential, a different checkid should be 
specified the next time CHKPT is executed. If the data set is 
partitioned, a different checkid need not be specified. This code is 
also returned if the checkpoint routine tries to open the checkpoint 
data set and the DD statement for the data set is missing. 

10 Successful completion with possible error condition. The task has 

control, by means of an explicit or implied use of the ENQ macro 
instruction, of a serially reusable resource; if the task terminates 
abnormally, it will not have control of the resource when the job step 
is restarted. The user's program must, therefore, reissue the ENQ 
macro instruction. 

14 Unsuccessful completion. An end-of- volume condition occurred while 

writing a checkpoint entry on a tape data set. The checkpoint was 
cancelled, but processing of the user's program continues. 

When one of the errors indicated by code 08, OC, 10, or 14 occurs, the system prints 
an error message on the operator's console. The message indicating code 08 or OC 
contains a code that further identifies the error. The operator should report the 
message contents to the programmer. 

Note: Successful use of the CHKPT macro instruction requires some care in the 
selection of checkpoints. For a detailed discussion of checkpoint requirements, refer to 
OS Advanced Checkpoint /Restart. 
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CHKPT — List Form 






The list form of the CHKPT instruction is used to construct a control program 

parameter list. 

The description of the standard form of the CHKPT macro provides the explanation of 

the function of each operand. The description of the standard form also indicates 

which operands are optional and which are required in at least one of the list and 

execute forms. The format description below indicates the optional and required 

operands in the list form only. Note that the CANCEL operand, which can be coded 

in the standard form, cannot be coded in the list form. 

The list form of the CHKPT macro instruction is written as follows: 



[symbol] 



CHKPT 



Tdcb address!, [checkid address] Jcheckid length! 
MF=L b' J 



symbol 

The symbol operand specifies any symbol that is valid in the assembler language. 

address 

The address operand specifies any address that may be written in an A-type 
address constant. 



length 



The length operand specifies any absolute expression that is valid in the 
assembler language. 



MF=L 



The MF-L operand indicates the list form of the CHKPT macro instruction. 
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CHKPT— Execute Form 



A control program parameter list is referred to, and can be modified by, the execute 

form of the CHKPT macro. 

The description of the standard form of the CHKPT macro provides the explanation of 

the function of each operand. The description of the standard form also indicates 

which operands are optional and which are required in at least one of the list and 

execute forms. The format description below indicates the optional and required 

operands for the execute form only. Note that the CANCEL operand, which can be 

coded in the standard form, cannot be coded in the execute form. 

The execute form of the CHKPT macro instruction is written as follows: 



[symbol J 



CHKPT 



[deb address], [checkid address] Tcheckid length! 

MF=(E,i control program list address)) 

j 0) ( 
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symbol 

The symbol operand specifies any symbol that is valid in assembler language. 



address 



The address operand specifies any address that is valid in an RX-type instruction, 
or one of the general registers 2 through 12, previously loaded with the indicated 
address. You may designate the register symbolically or with an absolute 
expression; always code it in parentheses. 



length 

The length operand specifies any absolute expression that is valid in assembler 
language, or one of the general registers 2 through 12, previously loaded with the 
indicated value. You may designate the register symbolically or with an absolute 
expression; always code it in parentheses. 

MF=(E, { control program list address }) 
{ (1) * 

This operand specifies the execute form of the macro instruction using a control 
program parameter list. The address of the control program parameter list can be 
coded as described under address, or can be loaded into register 1, in which case 
code MF=(E,(1)). 



o 
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CLOSE 

CLOSE-Logically Disconnect a Data Set (BDAM, BISAM, BPAM, BSAM, 
QISAM, and QSAM) 

The CLOSE macro instruction causes output data set labels to be created and volumes 
to be positioned as specified by the user. The fields of the data control block are 
restored to toe condition that existed before the OPEN macro instruction was issued, 
antthe dat set is disconnected from the processing program. Final volume posting 
to the current volume can be specified to override the positioning implied by the DD 
control statement DISP parameter. Any number^/rfr addm* WOS& and 
associated options may be specified in the CLOSE macro instruction. 
Associated data sets for a 3525 card punch can be closed in any sequence, but if one 
data set l closed, I/O operations cannot be initiated for any of its associated data sets. 
Additional information about closing associated data sets is contained in OS Data 
Management Services Guide. 

A FREEPOOL macro instruction shmUdj^m^f^w^CL^E macro 'instruction 
4%gfa the TO er pool suS grspSSnSdtodtoW a new buffer pool to be bui.t ,f the 
DCB is reopened with different record size attributes. 
A special operand, TYPE=T, is provided for processing with BSAM. 
The standard form of the CLOSE macro instruction is written as follows (the list and 
execute forms are shown following the description of the standard form): 



c 



f symbol J 



CLOSE 



(deb address, [option] ,...)[/ TYPE=f] 



deb address— A-Type Address or (2-12) 

The deb address operand specifies the address of the data control block for the 
opened data set that is to be closed. 



option 



These options indicate the volume positioning that is to occur when the data set is 
closed The option operand is ignored for ISAM data sets and also for data sets 
on other than magnetic tape or direct-access devices. The options are. 
REREAD — Specifies that the current volume is to be positioned to reprocess 

the data set. 
LEAVE — Specifies that the current volume is to be positioned to the logical 

end of the data set. (bCawnlfHl it "R&J&hCK) 

REWIND — Specifies that the current volume is to be positioned at the load 
REWIND &p^ re ^ diess Qf ^ d . rection Qf processing REWIND cann ot 

be specified when TYPE=T is specified. 



o 
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DISP — Specifies that the current volume is to be positioned according to 
the position implied by the DISP parameter of the corresponding DD 
statement, as follows: 



DISP Parameter 
PASS 



DELETE 

KEEP, CATLG, or 
UNCATLG 



Action 

Forward space to the end of data set on the 
current volume. 

Rewind the current volume. 

Rewind and unload the current volume. 



When the option operand is omitted, DISP is assumed. For TYPE=T, this is 
processed as LEAVE during execution. 

TYPE=T— Coded as shown 

You can code CLOSE TYPE=T and temporarily close sequential data sets on 
magnetic tape and direct-access volumes processed with BSAM. When you use 
TYPE=T, the DCB used to process the data set maintains its open status, and 
you don't have to issue another OPEN macro instruction to continue processing 
the same data set. This option cannot be used in a SYNAD routine. 

A request to temporarily close a data set causes the system control program to 
process labels, modify some of the fields in the system control blocks for that 
data set, and reposition the volume (or current volume in the case of multivolume 
data sets) in much the same way that the normal CLOSE macro does. When you 
code TYPE=T, you can specify that the volume either be positioned at the end of 
data (the LEAVE option) or be repositioned at the beginning of data (the 
REREAD option). Magnetic-tape volumes are repositioned either immediately 
before the first data record or immediately after the last data record; the presence 
of tape labels has no effect on repositioning. 

If you code the release (RLSE) operand on the DD statement for the data set, it 
is ignored by temporary close, but any unused space will be released when you 
finally issue the normal CLOSE macro instruction. 

Refer to OS Data Management Services Guide for additional information and 
coding restrictions. 
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CLOSE— List Form 



CLOSE— List Form 



C 



The list form of the CLOSE macro instruction is used to construct a data management 
parameter list. Any number of operands (data control block addresses and associated 
options) can be specified. 

The list consists of a one-word entry for each DCB in the parameter list; the high-order 
byte is used for the options and the three low-order bytes are used for the DCB 
address. The end of the list is indicated by a one in the high-order bit of the last 
entry's option byte. The length of a list generated by a list-form instruction must be 
equal to the maximum length required by an execute-form instruction that refers to the 
same list. A maximum length list can be constructed by one of two methods: 

• Code a list-form instruction with the maximum number of parameters that are 
required by an execute-form instruction that refers to the list. 

• Code a maximum length list by using commas in a list-form instruction to acquire 
a list of the appropriate size. For example, coding CLOSE (,„„„„),MF=L would 
provide a list of five fullwords (five deb addresses and five options). 

Entries at the end of the list that are not referenced by the execute-form instruction are 
assumed to have been filled in when the list was constructed or by a previous 
execute-form instruction. Before using the execute-form instruction, you may shorten 
the list by placing a one in the high-order bit of the last DCB entry to be processed, 

A zeroed work area on a fullword boundary is equivalent to CLOSE (,DISP V ..),MF==L 
and can be used in place of a list-form instruction. The high-order bit of the last DCB 
entry must contain a one before this list can be used with the execute-form instruction. 

A parameter list constructed by a CLOSE macro instruction, list form, can be referred 
to by either an OPEN or CLOSE execute-form instruction. 

The description of the standard form of the CLOSE macro instruction provides the 
explanation of the function of each operand. The description of the standard form also 
indicates which operands are completely optional and those required in at least one of 
the pair of list and execute forms. The format description below indicates the optional 
and required operands in the list form only. 

The list form of the CLOSE macro instruction is written as follows: 



[symbol] 


CLOSE 


( [deb address] , [option]/ . . ..) [, TYPE=T] , MF=L 



deb address-— A-Type Address 

option— Same as standard form 

TYPE=T— Coded as shown 

The TYPE=T operand can be coded in the list-form instruction to allow the 
specified option to be checked for validity when the program is assembled. 
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MF=L — Coded as shown if x 

The MF=L operand specifies that the CLOSE macro instruction is used to create 
a data management parameter list that will be referred to by an execute-form 
instruction. 



r 

v. 
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CLOSE — Execute Form 



CLOSE — Execute Form 



c 



A remote data management parameter list is used in and can be modified by the 
execute form of the CLOSE macro instruction. The parameter list can be generated by 
the list form of either an OPEN macro instruction or a CLOSE macro instruction. 

The description of the standard form of the CLOSE macro instruction provides the 
explanation of the function of each operand. The description of the standard form also 
indicates which operands are totally optional and those required in at least one of he 
pair of list and execute forms. The format description below indicates the optional and 
required operands in the execute form only. 
The execute form of the CLOSE macro instruction is written as follows: 



[symbolj 



CLOSE 



[( [deb address] , [option] ,...)] C TYPE=T] 
j^p=(E, ( data management list address) ) 



■{ 



(i) 



deb address — RX-Type Address or (2-12) 
option — Same as standard form 
TYPE=T — Same as standard form 

MF=(E, { data management list address }) 
{ (1) * 

This operand specifies that the execute form of the CLOSE macro instruction is 
being used, and an existing data management parameter list (created by a 
list-form instruction) will be used. The MF= operand is coded as described in 
the following: 
E — Coded as shown 
data management list address— RX-Type Address, (2-12), or (1) 
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CNTRL 

CNTRL — Control Online Input/Output Device (BSAM and QSAM) 

The CNTRL macro instruction is used to control magnetic tape drives (BSAM only) 
and to control online card readers, 3525 card punches (read and print features), and 
printers (BSAM and QSAM). The MACRF operand of the DCB macro instruction 
must specify a C. The CNTRL macro instruction must not be used for SYSOUT data 
sets that are temporarily stored on a direct-access device. For BSAM, all input and 
output operations must be tested for completion before the CNTRL macro instruction 
is issued. The control facilities available are as follows: 

Card Reader: Provides stacker selection. 

QSAM — The CNTRL macro instruction is issued whenever it is necessary to read 
a new card. For unblocked records, a CNTRL macro instruction should be issued 
after every input request except the last. For blocked records, a CNTRL macro 
instruction is issued after the last logical record on each card is retrieved, except 
for the last input request. The move mode of the GET macro instruction must be 
used, and the number of buffers (BUFNO field of the DCB) must be one. 

BSAM — The CNTRL macro instruction should be issued after every input 
request. If, however, the device is allocated to SYSIN, the CNTRL macro 
instruction does not need to be issued after the request because the CLOSE 
macro instruction places the last card in the same stacker as the preceding card. 

Printer: Provides line spacing or a skip to a specific carriage control channel. A 
CNTRL macro instruction cannot be used if carriage control characters are 
provided in the record. If the printer contains the universal character set feature, 
data checks should be blocked (OPTCD=U should not appear in the data control 
block). 

Magnetic Tape: Provides method of forward spacing and backspacing (BSAM only). 

If OPTCD=H is indicated in the data control block, the CNTRL macro 
instruction can be used to perform record positioning on DOS tapes that contain 
embedded checkpoint records. Embedded checkpoint records encountered during 
the record positioning are bypassed and are not counted as blocks spaced over. 
OPTCD=H must be specified in a job control language DD statement. The 
CNTRL macro instruction cannot be used to backspace DOS 7-track tapes that 
are written in data convert mode that contain embedded checkpoint records 
(BSAM). 

Note: The CNTRL macro should not be used with output operations on BSAM 
tape data sets. 

3525 Printing: Provides line spacing or a skip to a specific printing line on the card. 
The card contains 25 printing lines; the odd numbered lines 1 through 23 
correspond to the printer skip channels 1 through 12 (see the SK operand). For 
additional information about 3525 printing operations, refer to OS Data 
Management Services Guide. 
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The CNTRL macro instruction is written as follows: 



[symbol J 


CNTRL 


deb address, 


ssjil 










SP,, 


SI 








•^ 


SK, } through > 
Ll2 J 


>- 








BSM 
FSM 
BSR 
FSR 


, number of blocks 
, number of blocks 












^ J 
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deb address 



The deb address operand specifies the address of the data control block for the 
data set opened for the online device. 



SS, {1} 
12} 



The SS operand is coded as shown to indicate that the control function requested 
is stacker selection on a card reader; either 1 or 2 must be coded to indicate 
which stacker is to be selected. 



m 

SP, {2} 

{3} 



V-- 



The SP operand is coded as shown to indicate that the control function requested 
is printer or 3525 line spacing; either 1, 2, or 3 must be coded to indicate the 
number of spaces for each print line. 

m 

SK, through 
{12} 

The SK operand is coded as shown to indicate that the control function requested 
is a skip operation on the printer or 3525 card punch, print feature; a number (1 
through 12) must be coded to indicate the channel or print line to which the skip 
is to be taken. 

BSM — Coded as shown 

The BSM operand indicates that the control function requested is to backspace 
the magnetic tape past a tapemark, then forward space over the tapemark. When 
this operand is specified, the DCBBLKCT field in the data control block is set to 
zero. 



\^ : 
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CNTRL 



FSM — Coded as shown 

The FSM operand indicates that the control function requested is to forward 
space the magnetic tape over a tapemark, then backspace past the tapemark. 
men this operand is specified, the DCBBLKCT field in the data control block is 
set to zero. 
BSR — Coded as shown 

The BSR operand indicates that the control function requested is to backspace 
the magnetic tape the number of blocks indicated in the number-of- blocks 
operand. 
FSR — Coded as shown 

The FSR operand indicates that the control function requested is to forward space 
the magnetic tape the number of blocks indicated in the number-of -blocks 
operand. 

number of blocks —symbol, decimal digit, absexp, or (2-12) 

The number-of-blocks operand specifies the number of blocks to backspace (see 
BSR operand) or forward space (see FSR operand) the magnetic tape The 
maximum value that can be specified is 32,767. If the number-of-blocks operand 
is omitted, one is assumed. 

If the forward space or backspace operation is not completed successfully, control is 

O passed toTe erL analysis (SYNAD) routine; if no SYNAD routine is designated, the 

task's bnormally termmatedTei*ter contents, when control is passe to , the error 
analysis routine, are shown in Appendix A. If a tapemark is encountered for BSR or 
Sr control is returned to the processing program, and register 15 contains a count of 
S!SeSd forward spaces or backspaces. If the operation is completed normally, 
register 15 contains the value zero. 



O 
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DCB— BDAM 
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DCB — Construct a Data Control Block (BDAM) 



o 



The data control block for a basic direct access method (BDAM) data set is 
constructed during assembly of the problem program. The DCB macro instruction 
must not be coded within the first 16 bytes of a control section (CSECT). The 
ngORGand MACRF ope rands must be coded in the DCB macro instruction, but the 
olheTo^rlnds can bTsupplied from other sources. Each of the BDAM DCB operand 
descriptions contains a heading, "Source." The information under this heading describes 
the sources from which an operand can be supplied to the data control block. 

Before a DCB macro instruction for a BDAM data set is coded, the following 
characteristics of direct data sets should be considered. 

The problem program must synchronize I/O operations by issuing a CHECK or 
WAIT macro instruction to test for completion of read and write operations. 

A BDAM data set is created using the basic sequential access method (BSAM). 
A special operand (MACRF=WL) specifies that BSAM is being used to create a 
BDAM data set. Operand descriptions for the BDAM DCB macro instruction 
include information about both creating and processing a BDAM data set. 

Although a BDAM data set can contain blocked records, the problem program 
must nerfor m all blocking and deblockin g of records. BDAM provides only the 
Capability to read or write a data block, but the data block can contain multiple 
logical records assembled by the problem program. 

When a BDAM data set is being created, buffers can be acquired automatically, 
but buffer control must be provided by the problem program. The problem 
program must place data in the output buffer before issuing a WRITE macro 
instruction to write the data block. 

When a BDAM data set is being processed, the problem program can control all 
buffering, or dynamic buffering can be specified in the DCB macro instruction 
and subsequently requested in a READ macro instruction. 

The actual organization of a direct data set is determined by the programmer to 
meet the needs of the application. The data set can be processed by using one of 
the following addressing method s: 

1. Actual device addresses (in the form MBBCCHHR ). 

%. Relative track addresses (in the form TTR). These addresses specify a track (and 
Trecord on the" track) of the direct-access device relative to the beginning of the 
data set. 
■3 . Relative block addresses can be used with fixed-length records. These addresses 
/specify a*data block relative to the beginning of the data set. 
For additional information about the characteristics of BDAM data sets, refer to OS 
Data Management Services Guide. 



© 
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The following describes the DCB operands that can be specified for creating and 
processing a BDAM data set: 

BFALN= {F} 

& 

The BFALN operand specifies the boundary alignment for each buffer in the 
buffer pool. The BFALN operand can be specified when (1) BSAM is being used 
to create a BDAM data set and buffers are acquired autom atically, (2) when an 
existing BDAM data set is being processed and dynamic Puttering is requested, or 
(3) when the GETPOOL macro instruction is used t o construct the buffer pool. 
If the BFALN operand is omitted, the system provides doubleword alignment for 
each buffer. The following describes the characters that can be specified: 

F — Specifies that each buffer is aligned on a fullword boundary that is not 
also a doubleword boundary. 

D — Specifies that each buffer is aligned on a doubleword boundary. 

If the BUILD macro instruction is used to construct the buffer pool or if the 
problem program controls all buffering, the problem program must provide the 
main-storage area for the buffers and control buffer alignment. 

Source: The BFALN operand can be supplied in the DCB macro instruction, in 
| the DCB subparameter of a DD statement or by the problem program before 
completion of the data control block exit routine. If both the BFALN and 
BFTEK operands are specified, they must be supplied from the same source. 

BFTEK=R 

The BFTEK operand specifies that the data set is being created for or contains 
variable-length spanned records. The BFTEK operand can be r-Hf-^ ? n1 Y whpn 
the record format is specified as REC FM==VS. 

When variable-length spanned records are written, the data length can exceed the 
total capacity of a single track on the direct-access device being used, or it can 
exceed the remaining capacity on a given track. The system divides the data 
block into segments (if necessary), writes the first segment on a track, and writes 
the remaining segment (s) on the following track(s). 

When a variable-length spanned record is read, the system reads each segment 
and assembles a complete data block in the buffer designated in the area address 
operand of a READ macro instruction. 

Note: Variable-length spanned records can also be read using BSAM. When 
BSAM is used to read a BDAM variable-length spanned record, the record is read 
one segment at a time, and the problem program must assemble the segments into 
a complete data block. This operation is described in the section for the BSAM 
DCB macro instruction. 

Source: The BFTEK operand can be supplied in the DCB macro instruction, in 
the DCB subparameter of a DD statement, or by the problem program before 
completion of the data control block exit routine. If both the BFTEK and 
BFALN operands are specified, they must be supplied from the same source. 
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DCB— BDAM 



BLKSlZE=absexp (maximum value is 32,760) 



The BLKSIZE operand specifies the length, in bytes, of each data block for 
fixed-length records, or it specifies the maximum length, in bytes, of each data 
block for variable-length or undefined-length records. If keys are used, the length 
of the key is not included in the value specified for the BLKSIZE operand. 

The actual value that can be specified in the BLKSIZE operand depends on the 
record format and the type of direct-access device being used. If the 
track-overflow feature is being used or if variable-length spanned records are 
being used, the value specified in the BLKSIZE operand can be up to the 
maximum. For all other record formats (F, V, VBS, and U), the maximum value 
that can be specified in the BLKSIZE operand is determined by the track capacity 
of a single track on the direct-access device being used. Device capacity for 
direct-access devices is described in Appendix C of this publication. For 
additional information about device capacity and space allocation, refer to OS 
Data Management Services Guide. 

Source: The BLKSIZE operand can be supplied in the DCB macro instruction, in 
the DCB subparameter of a DD statement, by the problem program before 
completion of the data control block exit routine, or by the data set label of an 
existing data set. 

BUFCB=relexp 

The BUFCB operand specifies the address of the buffer pool control block when 
the buffer pool is constructed by a BUILD macro instruction. 

If the buffer pool is constructed automatical ly, dynamically, or by a GETPOO L 
macro instruction, the system places the address of the buffer pool control block 
into the data control block, and the BUFCB operand is not required . The 
BUFCB operand is not required if the problem program controls all buffering. 

Source: The BUFCB operand can be supplied in the DCB macro instruction or 
by the problem program before completion of the data control block exit routine. 

B\J¥L=absexp (maximum value is 32,760) 

The BUFL operand specifies the length, in bytes, of each buffer in the buffer pool 
when the buffers are acquired automatically (create BDAM) o_r dynamically 
(existing BDAM). 

When buffers are acquired automatically (create BDAM), the BUFL operand is 
optional; if specified, the value must be at least as large as the sum of the values 
specified for the KEYLEN and BLKSIZE operands. If the BUFL operand is 
omitted,the system constructs buffers with a length equal to the sum of the values 
specified in the KEYLEN and BLKSIZE operands. 

The BUFL operand must be specified when an existing BDAM data set is being 
processed and d ynamic buffering is requested. Its value must be at least as large 
as the value specified for the BLKSIZE operand when the READ or WRITE 
macro instruction specifies a key address, or the value specified in the BUFL 
operand must be at least as large as the sum of the values specified in the 
KEYLEN and BLKSIZE operands if the READ and WRITE macro instructions 
specify 4 S' for the key address. 



Macro Instruction Descriptions 43 



The BUFL operand can be omitted if the buffer pool is constructed by a BUILD /^ 

or GETPOOL macro instruction or if the problem program controls all buffering. V> 

Source: The BUFL operand can be supplied in the DCB macro instruction, in the 
DCB subparameter of a DD statement, or by the problem program before 
completion of the data control block exit routine. 

BUFNO =absexp (maximum value is 255) 

The BUFNO operand specifies the number of buffers to be constructed by a 
BUILD macro instruction, or it specifies the number of buffers and/or segment 
work areas to be acquired by the system . 

If the buffer pool is constructed by a BUILD macro instruction or if buffers are 
acquired a utomatically when BSAM is used to create a BDAM data set, the 
number of buffers must be specified in the BUFNO operand. 

If ^namic buffering i s requested when an existing BDAM data set is being 
processed, the BUFNO operand is optional; if omitted, the system acquires two 
buffers. 

If variable-length spanned records are being processed and dynamic buffering is 
requested, the system also acquires a segment work area for each buffer. If 
dyanmic buffering is not requested, the system acquires the number of segment 
work areas specified in the BUFNO operand. If the BUFNO operand is omitted 
when variable-length spanned records are being processed and dynamic buffering 
is not requested, the system acquires two segment work areas. 

If the buffer pool is constructed by a GETPOOL macro instruction or if the 
problem program controls all buffering, the BUFNO operand can be omitted, 
unless it is required to acquire additional segment work areas for variable-length 
spanned records. 

Source: The BUFNO operand can be supplied in the DCB macro instruction, in 
the DCB subparameter of a DD statement, or by the problem program before 
completion of the data control block exit routine. 

DDNAME==symbol 

The DDNAME operand specifies the name used to identify the job control 
language data definition (DD) statement that defines the data set being created or 
processed. 

Source: The DDNAME operand can be supplied in the DCB macro instruction or 
by the problem program before an OPEN macro instruction is issued to open the 
data set. 

DSORG= {DA} 
|DAU} 

The DSORG operand specifies the data set organization and if the data set 
contains any location-dependent information that would make it unmovable. For 
example, if actual device addresses are used to process a BDAM data set, the data 
set may be unmovable. The following describes the characters that can be 
specified: 

DA — Specifies a direct organization data set. 

DAU — Specifies a direct organization data set that contains 
location-dependent information. 
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DCB— BDAM 

When a BDAM data set is created, the basic sequential access method (BSAM) is 
used The DSORG operand in the DCB macro instruction must be coded as 
DSORG=PS or PSU when the data set is created, and the DCB subparameter m 
the corresponding DD statement must be coded as DSORG=DA or DAU. This 
creates a data set with a data set label identifying it as a BDAM data set. 
Source: The DSORG operand must be specified in the DCB macro instruction. 
See the above comment about creating a BDAM data set. 

EXLST=relexp 

The EXLST operand specifies the address of the problem program exit list. The 

EXLST operand must be specified if the problem program processes user labels 

during the Open or Close routine, if the data control block exit routine is used for 

additional processing, or if the DCB ABEND exit is used for ABEND condition 

analysis. 

Refer to Appendix D of this publication for the format and requirements of exit 

list processing. For additional information about exit list processing, refer to 06 

Data Management Services Guide. 

Source: The EXLST operand can be supplied in the DCB macro instruction or by 

the problem program before the exit is needed. 

HIARCHY= {0} 

m 

The HIARCHY operand specifies the main-storage hierarchy in which the buffer 
pool is to be constructed. The following describes the characters that can be 
specified: 

— Specifies that the buffer pool is constructed in processor storage. 

1 — Specifies that the buffer pool is constructed in IBM 2361 Core Storage. 

The storage hierarchy can also be specified in a GETPOOL macro instruction. If 
HIARCHY is omitted from all sources, the system constructs the buffer pool in 
processor storage. 

The buffer pool is constructed in the user region or partition within the indicated 
hierarchy; if space is not available within the indicated hierarchy, the task is 
abnormally terminated. The HIARCHY operand is ignored in systems that do not 
have hierarchy support. The HIARCHY operand must not be specrfied for MVT 
systems with Model 65 multiprocessing. 

Source- The HIARCHY operand can be supplied in the DCB macro instruction, 
in the DCB subparameter of a DD statement, or in the HIARCHY operand of a 
GETPOOL macro instruction. 
KEYLEN=afesexp (maximum value is 255) 

The KEYLEN operand specifies the length, in bytes, of all keys used in the data 
set When keys are used, a key is associated with each data block in the data set. 
If the key length is not supplied by any source, no input or output requests that 
require a key can be specified in a READ or WRITE macro instruction. 
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Source: The KEYLEN operand can be supplied in the DCB macro instruction, in 
the DCB subparameter of a DD statement, by the problem program before the 
completion of the data control block exit routine, or by an existing data set label. 

UMCT=absexp 

The LIMCT operand specifies the number of blocks or tracks to be searched 
when the extend ed se arch option (OPTCD=E ) is requested. 

When the extended search option is requested and relative block addressing is 
used, the records must be fixed-length record format. The system converts the 
number of blocks specified in the LIMCT operand into the number of tracks 
required to contain the blocks, then proceeds in the manner described below for 
relative track addressing. 

When the extended search option is requested and relative track addressing is 
used (or the number of blocks has been converted to the number of tracks), the 
system searches for the block specified in a READ or WRITE macro instruction 
(type DK), or it searches for available space in which to add a block (WRITE 
macro instruction, type DA). The search is as follows: 

• The search begins at the track specified by the block address operand of a 
READ or WRITE macro instruction. 

• The search continues until the search is satisfied, the number of tracks 
specified in the LIMCT operand have been searched, or the entire data set 
has been searched. If the search has not been satisfied when the last track 
of the data set is reached, the system continues the search by starting at the 

first track of the data set. This operation allows the number specified in the c 

LIMCT operand to exceed the size of the data set, causing the entire data \ ,. ; .,,^' 

set to be searched. 

The problem program can change the DCBLIMCT field in the data control block 
at any time, but if the extended search option is used, the DCBLIMCT field must 
not be zero when a READ or WRITE macro instruction is issued. 

If the extended search option is not requested, the system ignores the LIMCT 
operand, and the search for a data block is limited to a single track. 

Source: The LIMCT operand can be supplied in the DCB macro instruction, the 
DCB subparameter of a DD statement, or by the problem program before the 
count is required by a READ or WRITE macro instruction. 
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The MACRF operand specifies the type of macro instructions (READ, WRITE, 
CHECK and WAIT) used when the data set is processed. The MACRF operand 
also specifies the type of search argument and BDAM functions used with the 
data set. When BSAM is used to create a BDAM data set, the BSAM operand 
MACRF=WL is specified. This special operand invokes the BSAM routine that 
can create a BDAM data set. The following describes the characters that can be 
specified: 
A — Specifies that data blocks are to be added to the data set. 

C — Specifies that CHECK macro instructions are used to test for 

completion of read and write operations. If C is not specified, WAIT 
macro instructions must be used to test for completion of read and 
write operations. 

I _ Specifies that the search argument is to be the block identification 
portion of the data block. If relative addressing is used, the system 
converts the relative address to a full device address (MBBCCHHR) 
before the search. 

K — Specifies that the search argument is to be the key portion of the data 
block. The location of the key to be used as a search argument is 
specified in a READ or WRITE macro instruction. 

R — Specifies that READ macro instructions are used. READ macro 
instructions can be issued when the data set is opened for INPUT, 
OUTPUT, or UPDAT. 

S — Specifies that dynamic buf f eringjg requested by specifying 4 S' in the 
area address operand of a READ or WRITE macro instruction. 

W — Specifies that WRITE macro instructions are used. WRITE macro 
instructions can be issued only when the data set is opened for 
OUTPUT OR UPDAT. 
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X — Specifies that READ macro instructions request exclusive control of a 
data block. When exclusive control is requested, the data block must 
be released by a subsequent WRITE or RELEX macro instruction. 

Source: The MACRF operand must be supplied in the DCB macro instruction. 

OPTCD= [R][E][FJ[W] 
[A] 

The OPTCD operand specifies the optional services that are to be used with the 
BDAM data set. These options are related to the type of addressing used, the 
extended search option, block position feedback, and write-validity checking. ^The 
following describes the characters that can be specified; the characters can be 
specified in any order and no commas are required between characters. 

A — Specifies that actual device addresses (MBBCCHHR) are provided to 
the system when READ or WRITE macro instructions are issued. 

E — Specifies that the extended search option is used to locate data blocks 
or available space into which a data block can be added. When the 
extended search option is specified, the number of blocks or tracks to 
be searched must be specified in the LIMCT operand. The extended 
search option is ignored if actual addressing (OPTCD=A) is also 
specified. 

F — Specifies that block position feedback requested by a READ or 

WRITE macro instruction is to be in the same form that was originally 
presented to the system in the READ or WRITE macro instruction. If 
the F operand is omitted, the system provides feedback, when 
requested, in the form of an 8-byte actual device address. 

R — Specifies that relative block addresses (in the form of a 3 -byte binary 
number) are provided to the system when a READ or WRITE macro 
instruction is issued. 

W — Specifies that the system performs a validity check for each record 

written. If the device is a 2321, the system performs a validity check 
for each write operation whether it is requested or not. 

Note: If OPTCD = A and R are both omittecL the system requires^ that READ and 

WRITE macro instructions provide 3-byte relative track addresses (in the form 
TTR) - ■ - 

Relative track addressing can only be specified by omitting both A and R from 
the OPTCD operand. If you want to specify relative track addressing after your 
data set has been accessed using another addressing scheme (OPTCD=A or R), 
you should either specify a valid OPTCD operand (other than A or R) in the 
DCB macro or DD card when you reopen your data set, or zero out the 
OPTCD=A or R bits in the data control block exit routine. Note that the first 
method will prevent the open routines from merging any of the other OPTCD bits 
from the format- 1 DSCB into the DCB. Both methods will update the OPTCD 
in the DSCB if the open is for OUTPUT, OUTIN, or UPDAT. 
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DCB— BDAM 

Source: The OPTCD operand can be supplied in the DCB macro instruction, in 
the DCB subparameter of a DD statement, or by the problem program before an 
OPEN macro instruction is issued to open the data set. 

RECFM= {V } 

{V [S] } 

[BS] 
*F[T] } 

The RECFM operand specifies the format and characteristics of the records in the 

data set. The following describes the characters that can be coded; if the optional 

characters are coded, they must be coded in the order shown above. 

B — Specifies that the data set contains blocked records. The record 
format RECFM=VBS is the only combination in which B can be 
specified. RECFM=VBS does not cause the system to process 
spanned records; the problem program must block and segment the 
records. RECFM =VBS is treated as a variable-length record by 
BDAM. 

p _ Specifies that the data set contains fixed-length records. 

S — Specifies that the data set contains variable-length spanned records 
when it is coded as RECFM=VS. When RECFM=VBS is coded, the 
records are treated as variable-length records, and the problem 
program must block and segment the records. 

X — Specifies that the track-overflow feature is used with the data set. The 
track-overflow feature allows a record to be partially written on one 
track and the remainder is written on the following track (if required). 

U _ Specifies that the data set contains undefined-length records. 

V Specifies that the data set contains variable-length records. 

Source; The RECFM operand can be supplied in the DCB macro instruction, in 
the DCB subparameter of a DD statement, by the problem program before 
completion of the data control block exit routine, or by the data set label of an 
existing data set. 

SYNAD=relexp 

The SYNAD operand specifies the address of the error analysis routine to be 
given control when an uncorrectable input/output error occurs. The contents of 
the registers when the error analysis routine is given control are described in 
Appendix A of this publication. 

The error analysis routine must not use the save area pointed to by register 13 
because this area is used by the system. The system does not restore registers 
when it regains control from the error analysis routine. The error analysis routine 
can issue a RETURN macro instruction which uses the address in register 14 to 
return control to the system. When control is returned in this manner, the system 
returns control to the problem program and proceeds as though no error had been 
encountered. When a BDAM data set is being created, a return from the error 
analysis routine to the system causes abnormal termination of the task. 
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If the SYNAD operand is omitted, the task is abnormally terminated when an 



,T> 



uncorrectable input/output error occurs. V. >" 

Source: The SYNAD operand can be supplied in the DCB macro instruction or 
by the problem program. The problem program can also change the error routine 
address at any time. 






50 OS Data Management Macro Instructions 



o 



DCB — BISAM 



DCB — Construct a Data Control Block (BISAM) 



O 



O 



The data control block for the basic indexed sequential access method (BISAM) is 
constructed during assembly of the problem program. The DCB macro instruction 
must not be coded within the first 16 bytes of a control section (CSECT). The 
DSORG and MACRF operands must be coded in the DCB macro instruction, but the 
"other DCB operands can be supplied from other sources. Each BISAM DCB operand 
description contains a heading, "Source." The information under this heading describes 
the sources from which the operand can be supplied to the data control block. 

Before a DCB macro instruction for a BISAM data set is coded, the following 
characteristics of BISAM data sets should be considered: 

BISAM cannot be used to create an indexed sequential data set. 

BISAM performs the functions of direct retrieval of a logical record by key, direct 
update-in-place for a block of records, direct insertion of a new record in its 
correct key sequence. 

Buffering can be controlled by the problem program, or dynamic buffering can be 
specified in the DCB macro instruction and subsequently requested in a READ 
macro instruction. 

The problem program must synchronize I/O operations by issuing a CHECK or 
WAIT macro instruction to test for completion of Read and Write operations. 

Additional DCB operands provide the capability of reducing input/output 
operations by defining main-storage work areas to contain the highest level master 
index and the records being processed. 

For additional information about the characteristics of BISAM processing, refer to OS 

Data Management Services Guide. 

The following describes the DCB operands that can be supplied when the basic indexed 

sequential access method is used. 

BFALN= {F} 

The BFALN operand specifies the boundary alignment for each buffer in the 
buffer pool when the buffer pool is acquired for use with dynamic buffering or 
when the buffer pool is constructed by a GETPOOL macro instruction. If the 
BFALN operand is omitted, the system provides doubleword alignment for each 
buffer. The following describes the characters that can be specified. 

F — Specifies that each buffer is on a fullword boundary that is not also a 

doubleword boundary. 
D — Specifies that each buffer is on a doubleword boundary. 

If the BUILD macro instruction is used to construct the buffer pool or the 
problem program controls all buffering, the problem program must provide a 
main-storage area for the buffers and control buffer alignment. 
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Source: The BFALN operand can be supplied in the DCB macro instruction, in 
| the DCB subparameter of a DD statement or by the problem program before 
completion of the data control block exit routine. 

BUFCB=relexp 

The BUFCB operand specifies the address of the buffer pool control block when 
the buffer pool is constructed by a BUILD macro instruction. 

If dynamic buffering is requested or the buffer pool is constructed by a 
GETPOOL macro instruction, the system places the address of the buffer pool 
control block into the data control block, and the BUFCB operand must be 
omitted. The BUFCB operand must be omitted if the problem program controls 
all buffering. 

Source: The BUFCB operand can be supplied in the DCB macro instruction or 
by the problem program before completion of the data control block exit routine. 

BJJFL^absexp (maximum value is 32,760) 

The BUFL operand specifies the length of each buffer to be constructed by a 
BUILD or GETPOOL macro instruction. When the data set is opened, the 
system computes the minimum length required and verifies that the length in the 
buffer pool control block is equal to or greater than the minimum required. The 
system then inserts the computed length into the BUFL field of the data control 
block. 

If dynamic buffering is requested, the system computes the buffer length required, 
and the BUFL operand is not required. 

If the problem program controls all buffering, the BUFL operand is not required. 
However, an ISAM data set requires additional buffer space for system use. For 
a description of the buffer length required for various ISAM operations, refer to 
OS Data Management Services Guide. 

Source: The BUFL operand can be supplied in the DCB macro instruction, in the 
DCB subparameter of a DD statement, or by the problem program before 
completion of the data control block exit routine. 

BUFNO=*absexp (maximum value is 255) 

The BUFNO operand specifies the number of buffers requested for use with 
dynamic buffering, or it specifies the number of buffers to be constructed by a 
BUILD macro instruction. If dynamic buffering is requested but the BUFNO 
operand is omitted, the system automatically acquires two buffers for use with 
dynamic buffering. 

If the GETPOOL macro instruction is used to construct the buffer pool, the 
BUFNO operand is not required. 

Source: The BUFNO operand can be supplied in the DCB macro instruction, in 
the DCB subparameter of a DD statement, or by the problem program before 
completion of the data control block exit routine. 
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DCB— BISAM 

DDNAME =^ymfo/ 

The DDNAME operand specifies the name used to identify the job control 
language data definition statement that defines the ISAM data set to be 
processed. 

Source: The DDNAME operand can be supplied in the DCB macro instruction or 
by the problem program before an OPEN macro instruction is issued to open the 
data set. 

DSORG=IS 

The DSORG operand specifies the indexed sequential organization of the data 
set. IS is the only combination of characters that can be coded for BISAM. 

Source: The DSORG operand must be coded in the DCB macro instruction as 
well as in the DD statement unless it is for a data set passed from a previous job 
step. In this case, DSORG may be omitted from the DD DCB field. 

EXLST =relexp 

The EXLST operand specifies the address of the problem program exit list. The 
EXLST operand is required if the problem program uses the data control block 
exit routine for additional processing or if the DCB ABEND exit is used for 
ABEND condition analysis. 

Refer to Appendix D of this publication for the format and requirements for exit 
list processing. For additional information about exit list processing, refer to OS 
Data Management Services Guide. 

Source: The EXLST operand can be supplied in the DCB macro instruction or by 
the problem program before the associated exit is required. 

HIARCHY= {0} 

{1} 

The HIARCHY operand specifies the main-storage hierarchy in which the buffer 
pool is constructed. The following describes the characters that can be specified. 

_ Specifies that the buffer pool is constructed in processor storage. 

1 — Specifies that the buffer pool is constructed in IBM 2361 Core Storage. 

The HIARCHY operand can also be specified in a GETPOOL macro instruction. 
If the HIARCHY operand is omitted from all sources, the buffer pool is 
constructed in processor storage. 

The buffer pool is constructed within the user region or partition within the 
indicated hierarchy; if space is not available within the indicated hierarchy, the 
task is abnormally terminated. The HIARCHY operand is ignored in systems that 
do not have hierarchy support. The HIARCHY operand must not be specified for 
MVT systems with Model 65 multiprocessing. 

Source: The HIARCHY operand can be supplied in the DCB macro instruction, 
in the DCB subparameter of a DD statement, or in the HIARCHY operand of a 
GETPOOL macro instruction. 
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MACRF=KR [S] [C]) } 

I(W M [CD } 

[A] 

{VA} 

{(R [S] [C],W {U} [C]) } 
[U] {A} 

[USJ {UA} 

The MACRF operand specifies the type of macro instructions (READ, WRITE, 
CHECK, WAIT, and FREEDBUF) and type of processing (add records, dynamic 
buffering, and update records) to be used with the data set being processed. The 
operand can be coded in any of the combinations shown above; the following 
describes the characters that can be coded. 

A — Specifies that new records are to be added to the data set. This 

character must be coded if WRITE KN macro instructions are used 
with the data set. 

C — Specifies that the CHECK macro instruction is used to test I/O 

operations for completion. If C is not coded, WAIT macro instructions 
must be used. 

R — Specifies the READ macro instructions are used. When R is coded, 
the routines that allow the FREEDBUF macro instruction to be used 
are also included. 

S — Specifies that dynamic buffering is requested in READ macro 

instructions. / 

U — Specifies that records in the data set will be updated in place. If U is y 

coded in combination with R, it must also be coded in combination 
with W. For example, MACRF=(RU,WU). 

W — Specifies that WRITE macro instructions are used. 

Source: The MACRF operand must be coded in the DCB macro instruction. 

MSHl=reIexp 

The MSHI operand specifies the address of the main-storage area used to contain 
the highest level master index for the data set. The system uses this main-storage 
area to reduce the search time required to find a given record in the data set. The 
MSHI operand is coded only when the SMSI operand is coded. 

Source: The MSHI operand can be supplied in the DCB macro instruction or by 
the problem program before completion of the data control block exit routine. 

MSWA=relexp 

The MSWA operand specifies the address of the main-storage work area to be 
used by the system when new records are being added to the data set. This 
operand is optional, but the system acquires a minimum-size work area if the 
operand is omitted. The MSWA operand is coded only when the SMSW operand 
is coded. 



Processing efficiency can be increased if more than a minimum-size work area is 
provided. For more detailed information about work area size, refer to OS Data 
Management Services Guide. 
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Note: QISAM uses the DCBMSWA, DCBSMSI, and DCBSMSW fields in the 
data control block as a work area; these fields contain meaningful information 
only when the data set is opened for BISAM. 

Source: The MSWA operand can be supplied in the DCB macro instruction or by 
the problem program before completion of the data control block exit routine. 

NCP =absexp (maximum value is 99) 

The NCP operand specifies the maximum number of READ/WRITE macro 
instructions that are issued before the first CHECK (or WAIT) macro instruction 
is issued to test for completion of the I/O operation. The maximum number that 
can be specified may be less than 99 depending on the limit established when the 
operating system is generated. If the NCP operand is omitted, one is assumed. If 
dynamic buffering is used, the value specified for the NCP operand must not 
exceed the number of buffers specified in the BUFNO operand. 

Source: The NCP operand can be supplied in the DCB macro instruction, in the 
DCB subparameter of a DD statement, or by the problem program before an 
OPEN macro instruction is issued to open the data set. 

SMSl=absexp (maximum value is 65,535) 

The SMSI operand specifies the length, in bytes, required to contain the highest 
level master index for the data set being processed. The size required can be 
determined from the DCBNCRHI field of the data control block. When an 
ISAM data set is created (with QISAM), the size of the highest level index is 
inserted into the DCBNCRHI field. If the value specified in the SMSI operand is 
less than the value in the DCBNCRHI field, the task is abnormally terminated. 

Note: QISAM uses the DCBMSWA, DCBSMSI, and DCBSMSW fields as a 
work area; these fields contain meaningful information only when the data set is 
opened for BISAM. 

Source: The SMSI operand can be supplied in the DCB macro instruction or by 
the problem program before completion of the data control block exit routine. 

SMSW=absexp (maximum value is 65,535) 

The SMSW operand specifies the length, in bytes, of a work area in main storage 
that is used by BISAM. This operand is optional, but the system acquires a 
minimum-size work area if the operand is omitted. The SMSW operand is coded 
only when the MSWA operand is also coded. If the SMSW operand is coded but 
the size specified is less than the minimum required, the task is abnormally 
terminated. OS Data Management Services Guide describes the methods of 
calculating the size of the work area. 

If unblocked records are used, the work area must be large enough to contain all 
the count fields (eight bytes each), key fields, and data fields contained on one 
direct-access device track. 

If blocked records are used, the work area must be large enough to contain all the 
count fields (eight bytes each) and data fields contained on one direct-access 
device track plus additional space for one logical record (LRECL value). 
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Note: QISAM uses the DCBMSWA, DCBSMSI, and DCBSMSW fields in the 
data control block as a work area; these fields contain meaningful information 
only when the data set is opened for BISAM. 

Source: The SMSW operand can be supplied in the DCB macro instruction or by 
the problem program before completion of the data control block exit routine. 
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SYN AD =relexp 

The SYNAD operand specifies the address of the error anlaysis routine given 
control when an uncorrectable input/output error occurs. The contents of the 
registers when the error analysis routine is given control are described in 
Appendix A of this publication. 

The error anlaysis routine must not use the save area pointed to by register 13 
because this area is used by the system. The system does not restore registers 
when it regains control from the error analysis routine. The error analysis routine 
can issue a RETURN macro instruction which uses the address in register 14 to 
return control to the system. When control is returned in this manner, the system 
returns control to the problem program and proceeds as though no error had been 
encountered. If the error analysis routine continues processing, the results are 
unpredictable. 

For ISAM data sets, if the error analysis routine receives control from the Close 
routine, bit 3 of the IOBFLAG1 field in the input/output block is set to one. In 
this case, the error analysis routine must not issue a CLOSE macro instruction. 
To complete Close processing, the error analysis routine must return control to 
the Close routine with a branch to the address in register 14. 

If the SYNAD operand is omitted, the task is abnormally terminated when an L 

uncorrectable input/output error occurs. 

Source: The SYNAD operand can be supplied in the DCB macro instruction or 
by the problem program. The problem program can also change the error analysis 
routine address at any time. 
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The data control block for the basic partitioned access method (BPAM) is constructed 
during assembly of the problem program. The DCB macro instruction can be coded at 
any point in a control section (CSECT). The DSORCg and MACRF operands must be 
specified in the DCB macro instruction, but the other DCB operands can be supplied 
from other sources. Each of the BPAM DCB operand descriptions contains a heading, 
"Source." The information under this heading describes the sources which can supply 
the operand to the data control block. 

Before a DCB macro instruction for a BPAM data set is coded, the following 
characteristics of partitioned data sets should be considered: 

The entire partitioned data set must reside on one direct-access volume, but 
several such data sets, on the same or different volumes, can be concatenated for 
input. 
. When a partitioned data set is being created, the first (or only) DD statement for 
the data set must contain a SPACE parameter defining the size of the entire data 
set and its directory. From this information, the system allocates space for the 
data set and pre-formats the data set directory. As subsequent data set members 
are added, they are added in the space originally allocated. 

. A single member of a partitioned data set can be added or retrieved using BSAM 
or QSAM without using the BLDL, FIND, or STOW macro instructions. In this 
case, the data set member is being processed as a sequential data set 
(DSORG=PS). Processing a member in this manner does not provide the full 
capability of the basic partitioned access method. For more information about 
processing a member using BSAM or QSAM, refer to OS Data Management 
Services Guide. 

. A single member or multiple members can be added, retrieved, or updated using 
BPAM (many of the routines used by BPAM are actually BSAM routines). 

Buffers for a BPAM data set can be acquired automatically, but buffer control 

must be provided by the problem program. The problem program must issue a 

READ macro instruction that provides a buffer address to fill an input buffer, and 

it must place the data in an output buffer before issuing a WRITE macro 

instruction to write a data block. 

Although a BPAM data set can contain blocked records, the problem program 

must perform all blocking and deblocking of records. BPAM provides only the 

capability to read or write a data block, but the data block can contain multiple 

logical records assembled by the problem program. 

The STOW macro instruction can be used to add, delete, change, or replace a 

member name or alias in the directory. 

. Multiple members of the data set can be processed by building a list of member 
locations (with a BLDL macro instruction) and using the FIND macro instruction 
(in conjunction with the list) to locate the beginning of each member. 

The problem program must synchronize I/O operations by issuing a CHECK 
macro instruction for each READ or WRITE macro instruction issued. 
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These characteristics of partitioned data sets and the basic partitioned access method /""^ 

are described in more detail in OS Data Management Services Guide. t| y 

The following describes the DCB operands that can be specified when a BPAM data 
set is being created or processed. 

BFALN= {F} 

& 

The BFALN operand specifies the boundary alignment for each buffer in the 
buffer pool when the buffer pool is constructed automatically or by a GETPOOL 
macro instruction. If the BFALN operand is omitted, the system provides 
double word alignment for each buffer. The following describes the characters 
that can be specified in the BFALN operand. 

F — Specifies that each buffer is aligned on a f ullword boundary that is not 
also a doubleword boundary. 

D — Specifies that each buffer is aligned on a doubleword boundary. 

If the BUILD macro instruction is used to construct the buffer pool or if the 
problem program controls all buffering, the problem program must provide a 
main-storage area for the buffers and control buffer alignment. 

Source: The BFALN operand can be supplied in the DCB macro instruction, in 
| the DCB subparameter of a DD statement or by the problem program before 
completion of the data control block exit routine. 

BLKSlZE=absexp (maximum value is 32,760) 

The BLKSIZE operand specifies the length, in bytes, of each data block for L 

fixed-length records, or it specifies the maximum length, in bytes, for 
variable-length or undefined-length records. If keys are used, the length of the 
key is not included in the value specified for the BLKSIZE operand. 

The actual blocksize that can be specified depends on the record format and the 
type of direct-access device being used. If the track-overflow feature is used, the 
blocksize can be up to the maximum. If the track-overflow feature is not used, 
the maximum blocksize is determined by the track capacity of a single track on 
the direct-access device being used. Device capacity for direct-access devices is 
described in Appendix C of this publication. For additional information about 
device capacity and space allocation, refer to the OS Data Management Services 
Guide. 

For variable-length records, the value specified in the BLKSIZE operand must 
include the maximum logical record length (up to 32,756 bytes) plus four bytes 
for the block descriptor word (BDW). 

For undefined-length records, the value specified for the BLKSIZE operand can 
be altered by the problem program when the actual length becomes known to the 
problem program. The value can be inserted into the DCBBLKSI field of the 
data control block or specified in the length operand of a READ/WRITE macro 
instruction. 



v> 



58 OS Data Management Macro Instructions 



mmmmmMmlmtm 



o 



c 



o 



DCB— BPAM 

Source- The BLKSIZE operand can be supplied in the DCB macro instruction, in 
the DCB subparameter of a DD statement, by the problem program before 
completion of the data control block exit routine, or by the data set label ot an 
existing data set. 

BUFCB =relexp 

The BUFCB operand specifies the address of the buffer pool control block when 
the buffer pool is constructed by a BUILD macro instruction. 

If the buffer pool is constructed automatically or by a GETPOOL macro 
instruction, the system places the address of the buffer pool control block into the 
data control block and the BUFCB operand can be omitted. Also, if the problem 
program controls all buffering, the BUFCB operand should be omitted. 
Source- The BUFCB operand can be supplied in the DCB macro instruction or 
by the problem program before completion of the data control block exit routine. 

B\J¥L,=absexp (maximum value is 32,760) 

The BUFL operand specifies the length, in bytes, of each buffer in the buffer pool 
when the buffer pool is acquired automatically. If the BUFL operand is omitted 
and the buffer pool is acquired automatically, the system acquires buffers with a 
length that is equal to the sum of the values specified in the KEYLEN and 
BLKSIZE operands. If the problem program requires longer buffers, the BU*L 
operand should be specified. 
If the problem program controls all buffering, the BUFL operand is not required. 

Source- The BUFL operand can be supplied in the DCB macro instruction, in the 
DCB subparameter of a DD statement, or by the problem program before 
completion of the data control block exit routine. 

BU¥fiO=absexp (maximum value is 255) 

The BUFNO operand specifies the number of buffers to be constructed by a 
BUILD macro instruction, or it specifies the number of buffers to be acquired 
automatically by the system. 

If the problem program controls all buffering or if the buffer pool is constructed 
by a GETPOOL macro instruction, the BUFNO operand should be omitted. 

Source- The BUFNO operand can be supplied in the DCB macro instruction, in 
the DCB subparameter of a DD statement, or by the problem program before 
completion of the data control block exit routine. 

DDNAME=symboI 

The DDNAME operand specifies the name used to identify the job control 

language data definition (DD) statement that defines the data set being created or 

processed. 

Source- The DDNAME operand can be supplied in the DCB macro instruction or 

by the problem program before an OPEN macro instruction is issued to open the 

data set. 
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DSORG= {PO} 
{POU} 

The DSORG operand specifies the data set organization and if the data set 
contains any location-dependent information that would make it unmovable. The 
following describes the characters that can be specified. 

PO — Specifies a partitioned data set organization. 

POU — Specifies a partitioned data set organization and that the data set 
contains location-dependent information. 

Note: If BSAM or QSAM are used to add or retrieve a single member of a 
partitioned data set, a sequential access method is being used, and the DSORG 
operand is specified as PS or PSU. The name of the member being processed in 
this manner is supplied in a DD statement. 

Source: The DSORG operand must be specified in the DCB macro instruction. 

EODAD =r<?/ejc/> 

The EODAD operand specifies the address of the routine given control when the 

end of the input data set is reached. Control is given to this routine when an 

input request is made (READ macro instruction) and there are no additional input 

records to retrieve. The routine is entered when a CHECK macro instruction is 

issued and the end of the data set is reached. If the end of the data set is reached 

and no EODAD address has been supplied, the task is abnormally terminated. 

For additional information on the EODAD routine, see OS Data Management 

Services Guide. / N 

Source: The EODAD operand can be supplied in the DCB macro instruction or V ,/ 

by the problem program before the end of the data set is reached. 

EXLST=relexp 

The EXLST operand specifies the address of the problem program exit list. The 
EXLST operand is required if the problem program uses the data control block 
exit routine for additional processing or if the DCB ABEND exit is used for 
ABEND condition analysis. 

Refer to Appendix D of this publication for the format and requirements of the 
exit list processing. For additional information about exit list processing, refer to 
OS Data Management Services Guide. 

Source: The EXLST operand can be supplied in the DCB macro instruction or by 
the problem program before the OPEN macro instruction is issued to open the 
data set. 

HIARCHY= {0* 

m 

The HIARCHY operand specifies the main-storage hierarchy in which the buffer 
pool is constructed. The following describes the characters that can be specified. 

— Specifies that the buffer pool is constructed in processor storage. 

1 — Specifies that the buffer pool is constructed in IBM 2361 Core Storage. 
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The HIARCHY operand can also be specified in a GETPOOL macro instruction. 
If the HIARCHY operand is omitted from all sources, the system constructs the 
buffer pool in processor storage. 

The buffer pool is constructed in the user region or partition within the indicated 
hierarchy; if space is not available within the indicated hierarchy, the task is 
abnormally terminated. The HIARCHY operand is ignored in systems that do not 
have hierarchy support. The HIARCHY operand must not be specified for MVT 
systems with Model 65 multiprocessing. 

Source- The HIARCHY operand can be supplied in the DCB macro instruction, 
in the DCB subparameter of a DD statement, or in the HIARCHY operand of a 
GETPOOL macro instruction. 
KEYLEN=absexp (maximum value is 255) 

The KEYLEN operand specifies the length, in bytes, of the key associated with 
each data block in the direct-access device data set. If the key length is not 
supplied from any source by the end of the data control block exit routine, a key 
length of zero (no keys) is assumed. 

Source- The KEYLEN operand can be supplied in the DCB macro instruction, in 
the DCB subparameter of a DD statement, by the problem program before the 
completion of the data control block exit routine, or by the data set label ot an 
existing data set. 
LRECL=absexp (maximum value is 32,760) 

The LRECL operand specifies the length, in bytes, of each fixed-length logical 
record in the data set; It is required only for fixed-length records The value 
specified in the LRECL operand cannot exceed the value specified in the 
BLKSIZE operand. 

If the records are unblocked, the value specified in the LRECL operand must 
equal the value specified in the BLKSIZE operand. If the records are blocked 
the value specified in the LRECL operand must be evenly divisible into the value 
specified in the BLKSIZE operand. 

Source- The LRECL operand can be supplied in the DCB macro instruction, in 
the DCB subparameter of a DD statement, by the problem program before 
completion of the data control block exit routine, or by the data set label of an 
existing data set. 
MACRF= KR)} 

KW)} 
KR,W)} 
The MACRF operand specifies the type of macro instructions (READ, WRITE, 
and NOTE/POINT) that are used to process the data set. The following 
describes the characters that can be specified: 
R _ specifies that READ macro instructions are used. This operand 

automatically provides the capability to use both the NOTE and 

POINT macro instructions with the data set. 
w _ Specifies that WRITE macro instructions are used. This operand 

automatically provides the capability to use the NOTE macro 

instruction with the data set. 
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All BPAM READ and WRITE macro instructions issued must be tested for 
completion using a CHECK macro instruction. The MACRF operand does not 
require any coding to specify that a CHECK macro instruction will be used. 

Source: The MACRF operand must be specified in the DCB macro instruction. 

NCP=absexp (maximum value is 99) 

The NCP operand specifies the maximum number of READ and WRITE macro 
instructions that will be issued before the first CHECK macro instruction is 
issued. The maximum number may be less than 99 depending on the limit 
established when the operating system is generated. If chained scheduling is 
specified, NCP must be specified as more than one. If the NCP operand is 
omitted, one is assumed. 

Source: The NCP operand can be supplied in the DCB macro instruction, in the 
DCB subparameter of a DD statement, or by the problem program before an 
OPEN macro instruction is issued to open the data set. 

OPTCD= {C} 

{Wf 
{WC} 

The OPTCD operand specifies the optional services performed by the system. 
The following describes the characters that can be specified; they can be specified 
in any order and no commas are required between characters. 

C — Specifies that chained scheduling is used. 

W — Specifies that the system performs a validity check for each record 

written. If the device is a 2321, the system performs a validity check (, 

for each write operation whether it is requested or not. ^ 

Source: The OPTCD operand can be supplied in the DCB macro instruction, in 
the DCB subparameter of a DD statement, or by the problem program before an 
OPEN macro instruction is issued to open the data set. However, all optional 
services must be requested from the same source. 

RECFM= {U [T] [A] } 
[M] 

{V [B] [A] } 
[T] [M] 
[BT] 

{F [B] [A] } 
[TJ [M] 
[BT] 
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The RECFM operand specifies the record format and characteristics of the data 
set being created or processed. All the record formats shown above can be 
specified but in those formats that show blocked records, the problem program 
Ztvvfol the blocking and deblocking of logical records BPAM recognizes 
only data blocks. When RECFM is not specified, undefined format is assumed. 
The following describes the characters that can be specified. 
A - Specifies that the records in the data set contain American National 
Standards Institute (ANSI) control characters. Refer to Append.x E 
for a description of control characters. 
B — Specifies that the data set contains blocked records. 
F — Specifies that the data set contains fixed-length records. 
M - Specifies that the records in the data set contain machine code control 
characters. Refer to Appendix E for a description of control 
characters. 
T - Specifies that the track-overflow feature is used with the data set. The 
track-overflow feature allows a record to be written partially on one 
track of a direct-access device and the remainder of the record wntten 
on the following track (if required). Chained scheduling (OPTCD=C) 
cannot be used if the track-overflow feature is used. 
U — Specifies that the data set contains undefined-length records. 
V — Specifies that the data set contains variable-length records. 
Source- The RECFM operand can be supplied in the DCB macro instruction, in 
the DCB subparameter of a DD statement, by the problem program before 
completion of the data control block exit routine, or by the data set label ot an 
existing data set. 

SYS AD =relexp 

The SYNAD operand specifies the address of the error analysis (SYNAD) routine 
to be given control when an uncorrectable input/output error occurs. The 
contents of the registers when the error analysis routine is given control are 
described in Appendix A. 

The error analysis routine must not use the save area pointed to by register 13, 
because this area is used by the system. The system does not restore registers 
when regains control from the error analysis routine. The error analysis routine 
can return control to the system by issuing a RETURN macro msWmlf 
control is returned to the system, the system returns control to the problem 

program and proceeds as though no error had been encountered. 

If the SYNAD operand is omitted, the task is abnormally terminated when an 

uncorrectable input/output error occurs. 

Source- The SYNAD operand can be supplied in the DCB macro instruction or 

by the problem program The problem program can also change the error routme 

address at any time. 
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DCB— Construct a Data Control Block (BSAM) 

The data control block for the basic sequ ential norm* mpthnH fRK^|^/n is constructed 
during assembly of the problem program. The DCB macro instruction must not be 
coded within the first 16 bytes of a control section (CSECT). The D£j>OR(| and 
MACRF operands must be coded in the DCB macro instruction, but the other DCB 
operands can be supplied, to the data control block, from other sources. Each DCB 
operand description contains a heading, "Source." The information under this heading 
describes the sources from which an operand can be supplied. 

Before a DCB macro instruction for creating or processing a BSAM data set is coded, 
the following characteristics of BSAM data sets should be considered: 

• Although several record formats with blocked records can be specified for BSAM, 
the problem program must perform all blocking and deblocking of records. 
BSAM provides only the capability to read or write a data block ? but the block 
can contain one or more logical records assembled by the problem program. 

• Buffers for a BSAM data set can be acquired automatically, but buffer control 
must be provided by the problem program. The problem program must issue a 
READ macro instruction that provides a buffer address to fill an input buffer, and 
it must place the data in an output buffer before issuing the WRITE macro 
instruction to write a data block. 

• The problem program must synchronize I/O operations by issuing a CHECK 
macro instruction for each flF AD and WRJTF macro instruction issued. 

• BSAM provides capability for nonsequential processing by using the NOTE and 
POINT macro instructions. 

• Keys for direct-access device records can be read or written using BSAM. 

• Specifying the DEVD operand in the DCB macro instruction can make the 
program device dependent. 

These characteristics of basic sequential access method data sets are described in more 
detail in OS Data Management Services Guide. 

The following describes the operands that can be specified in the DCB macro 
instruction for a BSAM data set. 

BFALN= {¥} 

The BFALN operand specifies the boundary alignment for each buffer in the 
buffer pool when the buffer pool is constructed automatically or by a GETPOOL 
macro instruction. If the BFALN operand is omitted , the system provides 
doubleworH alfanment for ear.h buffer 

If the data set being created or processed contains ASCII tape records with a 
block prefix, the block prefix is entered at the beginning of the buffer, and data 
alignment depends on the length of the block prefix. For a description of how to 
specify the block prefix length, refer to the DCB BUFOFF operand. 
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The following describes the characters that can be specified. 

F — Specifies that each buffer is on a fullword boundary that is not also^ a 
doubleword boundary . 

D — Specifies that each buffer is on a doubleword boundary. 

If the BUILD macro instruction is used to construct the buffer pool or if the 
problem program controls all buffering, the problem program must provide a 
main-storage area for the buffers and control buffer alignment. 

Source: The BFALN operand can be supplied in the DCB macro instruction, in 
the DCB subparameter of a DD statement or by the problem program before 
completion of the data block exit routine. If both the BFALN and BFTEK 
operands are specified, they must be supplied by the same source. 






BFTEK=R 

The BFTEK=R operand specifies that BSAM is used to read_unblocked_ 
variable-lengt h spanned rf^o rds with keys from a BDAM data set. Each read 
operation reads one segment of the record and places it in the area designated in 
the READ macro instruction. The first segment enters at the beginning of the 
area, but all subsequent segments are offset by the length of the key (only the 
first segment has a key). The problem program must provide an area in which to 
assemble a record, identify each segment, and assemble the segments into a 
complete record. 

Source: The BFTEK operand can be supplied in the DCB macro instruction, in 
the DCB subparameter of a DD statement, or by the problem program before 
completion of the data control block exit routine. If both the BFTEK and 
BFALN operands are specified, they must be supplied from the same source. 

BLKSlZE=absexp (maximum value is 32,760) 

The BLKSIZE operands specifies the length, in bytes, for fixed-length records^ or 
it specifies the maximum length, in bytes, for variable-length or undefined-length 
records. The BLKSIZE operand includes only the data block length; if keys are 
used, the length of the key is not included in the value specified for the BLKSIZE 
operand. 

The actual value that can be specified in the BLKSIZE operand depends on the 
device type and the record format being used. Device capacity is shown in 
Appendix C of this publication. For additional information about device capacity, 
refer to OS Data Management Services Guide. For direct-access devices when 
the track-overflow feature is used or variable-length spanned records are being 
processed, the value specified in the BLKSIZE operand can be up to the 
maximum value. For other record formats used with direct-access devices, the 
value specified for BLKSIZE cann ot exceed the capacity of a single track . 

If fixed-length records are used for a SYSOUT data set, the value specified in the 
BLKSIZE operand must be an integral multiple of the value specified for the 
logical record length (LRECL); otherwise the system will adjust the blocksize 
downward to the nearest multiple. 

If variable-length re cords are used, the value specified in the BLKSIZE operand 
must include the maximum logical record length (up to 32,756 bytes) j)lusj±ie^ 
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four bytes required for the block descriptor word (BDW ). For format-D 
variable-length records (ASCII data sets), the minimum value for BLKSIZE is 18 
and the maximum value is 2,048. 

If ASCII t ape records with a block prefix are processed, the value specified in the 
BLKSIZE operand must also include the length of the block prefix. 

If BSAM is used to read variable-length spanned records from a BDAM data set, 
the value specified for the BLKSIZE operand must be as large as the longest 
possible record segment in the BDAM data set, including four bytes for the 
segment descriptor word (SDW) and four bytes for the block descriptor word 
(BDW). 

If undefined-length records are used, the value specified for the BLKSIZE 
operand can be altered by the problem program when the actual length becomes 
known to the problem program. The value can be inserted directly into the 
DCBBLKSI field of the data control block or specified in the length operand of a 
READ/WRITE macro instruction. 
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Source: The BLKSIZE operand can be supplied in the DCB macro instruction, in 
the DCB subparameter of a DD statement, by the problem program before 
completion of the data control block exit routine, or by the data set label of an 
existing data set. 

BUFCB=relexp 



The BUFCB operand specifies the address of the buffer pool control block in a 
buffer pool constructed by a BUILD macro instruction. 

If the buffer pool is constructed automatically or by a GETPOOL macro 
instruction, the system places the address of the buffer pool control block into the 
data control block, and the BIJFrR nppranH ghnniH fre omitted If the problem 
program controls all buffering, the BUFCB operand is not required. 

Source: The BUFCB operand can be supplied in the DCB macro instruction or 
by the problem program before completion of the data control block exit routine. 

BUFL=absexp (maximum value is 32,760) 

The BUFL operand specifies the length, in bytes, for each buffer in the buffer 
pool when the buffer pool is acquire d automaticall y. The system acquires buffers 
with a length equal to the sum of the values specified in the KEYLEN and 
BLKSIZE operands if the BUFL operand is omitted; if the problem program 
requires larger buffers, the BUFL operand must be specified. If the BUFL 
operand is specified, it must be at least as large as the value specified in the 
BLKSIZE operand. If the data set is for card image mode, the BUFL operand 
should be specified as 160. The description of the DEVD operand contains a 
description of card image mode. 

If the data set contains ASCII tape record s with a block prefix, the value specified 
in the BUFL operand must include the block length plus the length of the block 
prefix. 

If t he problem program controls all buffering or if the buffer pool is constructed 
by a GETPOOL or BUILD macro instruction, the BUFL operand is not req uired. 
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Source: The BUFL operand can be supplied in the DCB macro instruction, in the 
DCB subparameter of a DD statement, or by the problem program before 
completion of the data control block exit routine. 

BUFNO=absexp (maximum value is 255) 

The BUFNO operand specifies the number of buffers constructed by a BUILD 
macro instruction or the number of buffers to be acquired automatically b y the 
system. — — 

If the problem program controls all buffering or if the buffer pool is constructed 
by a GETPOOL macro instruction, the BUFNO operand should be omitted. 

Source: The BUFNO operand can be supplied in the DCB macro instruction, in 
the DCB subparameter of a DD statement, or by the problem program before 
completion of the data control block exit routine. 

BUFOFF= { absexp } 

iU 

The BUFOFF operand specifies the length, in bytes, of the block prefix used with 
an ASCII tape data set . When BSAM is used to read an ASCII tape data set, the 
problem program must use the block prefix length to determine the location of the 
data in the buffer. When BSAM is used to write an output ASCII tape data set, 
the problem program must insert the block prefix into the buffer followed by the 
data (BSAM considers the block prefix as data). The block prefix and data can 
consist of any characters that can be translated into ASCII code; any character 
that cannot be translated is replaced with a substitute character. The following 
can be specified in the BUFOFF operand: 

absexp — Specifies the length, in bytes, of the block prefix. This value can be 
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from to 99 for an input data set. The value must be for writing an V_^ 

output data set with fixed-length or undefined-length records (BSAM 
considers the block prefix part of the data record). 

L — Specifies that the block prefix is 4 bytes long and contains the block 

length. BUFOFF=L is used when format-D records (ASCII) are 
processed. When BUFOFF=L is specified, the BSAM problem 
program can process the data records (using READ and WRITE macro 
instructions) in the same manner as if the data were in format-V 
variable-length records. 

If the BUFOFF operand is omitted for an i r|p ui data set with format-D 
records, the system inserts the record length into the DCBLRECL field 
of the data control block; the problem program must obtain the length 
from this field to process the record. 

If the BUFOFF operand is omitted from an output data set with 
format-D records, the problem program must insert the actual record 
length into the DCBBLKSI field of the data control block or specify 
the record length in the length operand of a WRITE macro instruction. 

Source: The BUFOFF operand can be supplied in the DCB macro instruction, in 
the DCB subparameter of a DD statement, or by the problem program before an 
OPEN macro instruction is issued to open the data set. 



G 



68 OS Data Management Macro Instructions 



o 



DCB— BSAM 

DDNAME ^symbol 

The DDNAME operand specifies the name used to identify the job control 

language data definition (DD) statement that defines the data set being created or 

processed. 

Source: The DDNAME operand can be supplied in the DCB macro instruction or 

by the problem program before an OPEN macro instruction is issued to open the 

data set. 

DEVD= {DA [ 9 ¥EYLEN=absexp] 
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{ET} 


{PT [,CODE= {A}] 




{B} 
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ro 
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{PR [,PRTSP={0}] 
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{PC [,MODE= [C][R]][,STACK= 


[E] 





{RD[,MODE= [C][OU[,STACK= 
[E] [R] 



{1H[,FUNC= 


{I H 


{2} 


{P \ 




{PW[XT] } 




{R i 




{RP[D] } 




{RW[T] } 




{RWP[XT][D] } 




{W[T] } 


{1}]|,FUNC= 


{I H 


{2} 


{P } 




{PW[XT] } 




{R } 




{RP[D] } 




{RW[T] } 




{RWP[XT][D1 } 




{W[T] } 



The DEVD operand specifies the device type on which the data set can or does 
reside. The device types above are shown with the optional operand(s) that can 
be coded when a particular device is used. The devices are listed in order of 
device-independence. For example, if DEVD=DA is coded in a DCB macro 
instruction (or the DEVD operand is omitted, which causes a default to DA ), the 
data control block constructed during assembly could later be used for any of the 
other devices, but if DEVD=RD is coded, the data control block can be used only 



o 



Macro Instruction Descriptions 69 



o 



with a card reader or card reader punch. Unless you are certain that device 
interchangeability is not required, you should either code DEVD=DA or omit the 
operand and allow it to default to DA. 

If system input is directed to an intermediate storage device, the DEVD operand 
is omitted, and the job control language for the problem program designates the 
system input device to be used. Likewise, if system output is directed to an 
intermediate storage device, the DEVD operand is omitted, and the job control 
language for the problem program designates the system output device to be used. 

The following describes the device type and the optional operands that can be 
specified for each device type: 

DA — Specifies that the data control block can be used for a direct-access 
device (or any of the other device types described following DA). 

KEYLEN-absexp V^ 

The KEYLEN operand can be specified only for data sets that 
reside on direct-access devices. Since the KEYLEN is usually 
coded without a DEVD operand (default taken), the description 
of the KEYLEN operand is in alphabetic sequence with the other 
operands. 

TA — Specifies that the data control block can be used for a magnetic tape 
data set (or any of the other device types described following TA). If 
TA is coded, the following optional operands can be coded. 

DEN= {0} \s^ 

m f 

{3} 

The DEN operand specifies the recording density in the number of 
bits-per-inch per track as shown in the following chart. 

DEN 7-Track Tape 9-Track Tape 9-Track Tape 9-Track Tape 

(Phase Encoded) (Dual Density) 

200 — — — 

1 556 — — — 

2 800 800 — 800 (NRZI) 

3 — — 1600 1600 (PE) 

NRZI is for non-return-to-zero-inverse mode 
PE is for phase encoded mode 

Specifying DEN=0 for a 7-track, 3420 tape will result in a 556 
bits-per-inch recording density, but corresponding messages and tape 
labels will indicate a 200 bits-per-inch recording density. 

If the DEN operand is not supplied by any source, the highest 
applicable density is assumed. 



TRTCH= {C} 
*ET} 
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The TRTCH operand specifies the recording technique for 7 -track 
tape. One of the above four character combinations can be coded. If 
the TRTCH operand is omitted, odd parity with no translation or 
conversion is assumed. The following describes the characters that can 
be specified: 

C Specifies that the data-conversion feature is used with odd 

parity and no translation. 
E Specifies even parity with no translation or conversion. 

ET — Specifies even parity with BCDIC to EBCDIC translation 
required and no data-conversion feature. 

T — Specifies that BCDIC to EBCDIC translation is required 
with odd parity and no data-conversion feature. 

PT — Specifies that the data control block is used for a paper tape device (or 
any of the other devices following PT). If PT is coded, the following 
optional operand can be coded. 

CODE- {A} 

TO 

{C} 

m 
m 

m 

The CODE operand specifies the code in which the data was punched. 
The system converts these codes to EBCDIC code. If the CODE 
operand is not supplied by any source, CODE=I is assumed. The 
following describes the characters that can be specified. 

A — Specifies 8-track tape in ASCII code. 

B — Specifies Burroughs 7-track tape. 

C — Specifies National Cash Register 8-track tape. 

F — Specifies Friden 8-track tape. 

I _ Specifies IBM BCD perforated tape and transmission code 

with 8 tracks. 

N — Specifies that no conversion is required. 

X — Specifies Teletype 1 5-track tape. 

PR — Specifies that the data control block is used for an online printer (or 
any of the other device types following PR). If PR is coded, the 
following optional operand can be coded. 

PRTSP= {0} 

m 

{3} 



1 Trademark of Teletype Corporation 
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The PRTSP operand specifies the line spacing on the printer. This m \ 

operand is not valid if the RECFM operand specifies either machine \^' 

(RECFM=M) or ANSI (RECFM=A) control characters. If the 
PRTSP operand is not specified from any source, one is assumed. The 
following describes the characters that can be specified. 

— Specifies that spacing is suppressed (no space). 

1 — Specifies single-spacing. 

2 — Specifies double-spacing (one blank line between printed 

lines). 

3 — Specifies triple-spacing (two blank lines between printed 

lines). 

PC — Specifies that the data control block is used for a card punch (or any 
of the other device types following PC). If PC is coded, the following 
optional operands can be specified. 

MODE= [C] [R] y/ 

[E] 

The MODE operand specifies the mode of operation for the card 
punch. The following describes the characters that can be specified. If 
the MODE operand is omitted, E is assumed. 

C — Specifies that the cards are to be punched in card image 
mode. In card image mode, the 12 rows in each card 
column are punched from two consecutive bytes in main 
storage. Rows 12 through 3 are punched from the 
low-order 6 bits of one byte and rows 4 through 9 are 
punched from the low-order six bits of the following byte. 

E — Specifies that cards are to be punched in EBCDIC code. 

R — Specifies that the program runs in read-column-eliminate 

mode (3505 card reader or 3525 card punch, read feature). 

Note: If the MODE operand is specified in the DCB subparameter of 
a DD statement, either C or E must be specified if R is specified. 

STACK= |1} / 

12} V 

The STACK operand specifies the stacker bin into which the card is 
placed after punching is completed. If this operand is omitted, stacker 
number 1 is used. The following describes the characters that can be 
specified: 

1 — Specifies stacker number 1 . 

2 — Specifies stacker number 2. 
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^to^ FUNC= {I } / 

{PW[XT] } v 

{RP[D] } 

{RW[T] } 

{RWP[XT][D] } 

{W[TJ J 

The FUNC operand defines the type of 3525 card punch data sets that 
are used. FUNC operand is omitted from all sources, a data set 
opened for input defaults to read only, and a data set opened for 
output defaults to punch only. The following describes the characters 
that can be specified in the FUNC operand. 

D — Specifies that the data protection option is to be used. The 
data protection option prevents punching information into 
card columns that already contain data. When the data 
protection option is used, an 80-byte data protection image 
(DPI) must have been previously stored in 
SYS1.IMAGELIB. Data protection applies only to the 
output/punch portion of a read and punch or read punch 
and print operation. 

I — Specifies that the data in the data set is to be punched into 
cards and printed on the cards; the first 64 characters are 
printed on line 1 of the card and the remaining 16 
characters are printed on line 3. 

p — Specifies that the data set is for punching cards. Seethe 
description of the character X for associated punch and 
print data sets. 

R _ Specifies that the data set is for reading cards. 

T — Specifies that the two-line print option is used. The 

two-line print option allows two lines of data to be printed 
on the card (lines 1 and 3). If T is not specified, the 
multiline print option is used; this allows printing on all 25 
possible print lines. In either case, the data printed may be 
the same as the data punched in the card, or it may be 

entirely different data. 

w — Specifies that the data set is for printing. See the 

description of the character X for associated punch and 
print data sets. 

X — Specifies that an associated data set is opened for output for 
both punching and printing. Coding the character X is used 
to distinguish the 3525 printer output data set from the 
3525 punch output data set. 

Note: If data protection is specified, the data protection image (DPI) 
must be specified in the FCB subparameter of the DD statement for 
the data set. 
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RD — Specifies that the data control block is used with a card reader or card 
read punch. If RD is specified, the data control block cannot be used 
with any other device type. When RD is coded, the following optional 
operands can be specified. 



MODE= [C] [O] 
[E] [R] 



/ 



The MODE operand specifies the mode of operation for the card 
reader. The following describes the characters that can be specified: 

C — Specifies that the cards to be read are in card image mode. 
In card image mode, the 12 rows in each card column are 
read into two consecutive bytes of main storage. Rows 12 
through 3 are read into one byte and rows 4 through 9 are 
read into the following byte. 

E — Specifies that the cards to be read contain data in EBCDIC 
code. 

— Specifies that the program runs in optical-mark-read mode 

(3505 card reader only). 

R — Specifies that the program runs in read-column-eliminate 
mode (3505 card reader and 3525 card reader only). 

Note: If the MODE operand for a 3505 or 3525 is specified in the 
DCB subparameter of a DD statement, either C or E must be specified 
if R or O is specified. 

STACK= {1} 

{2} 

The STACK operand specifies the stacker bin into which the card is 
placed after reading is completed. If this operand is omitted, stacker 
number 1 is used. The following describes the characters that can be 
specified. 

1 — Specifies stacker number 1 . 

2 — Specifies stacker number 2. 



FUNC= 



IP 

{PW[XT] 

m 

*RP[D] 
*RW[T] 
{RWP[XT][D] } 
|W[T] } 



The FUNC operand defines the type of 3525 card punch data sets that 
are used. If the FUNC operand is omitted from all sources, a data set 
opened for input defaults to read only, and a data set opened for 
output defaults to punch only. The following describes the characters 
that can be specified in the FUNC operand. 

D — Specifies that the data protection option is to be used. The 
data protection option prevents punching information into 
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card columns that already contain data. When the data 
protection option is used, an 80-byte data protection image 
(DPI) must have been previously stored in 
SYS1.IMAGELIB. Data protection applies only to the 
output/punch portion of a read and punch or read punch 
and print operation. 

I — Specifies that the data in the data set is to be punched into 
cards and printed on the cards; the first 64 characters are 
printed on line 1 of the card and the remaining 16 
characters are printed on line 3. 

p _ Specifies that the data set is for punching cards. See the 
description of the character X for associated punch and 
print data sets. 

R _ Specifies that the data set is for reading cards. 

X Specifies that the two-line print option is used. The 

two-line print option allows two lines of data to be printed 
on the card (lines 1 and 3). If T is not specified, the 
multiline print option is used; this allows printing on all 25 
possible print lines. In either case, the data printed may be 
the same as the data punched in the card, or it may be 
entirely different data. 

W _ Specifies that the data set is for printing. See the 

description of the character X for associated punch and 
print data sets. 

x — Specifies that an associated data set is opened for output for 
both punching and printing. Coding the character X is used 
to distinguish the 3525 printer output data set from the 
3525 punch output data set. 

Note: If data protection is specified, the data protection image (DPI) 
must be specified in the FCB subparameter of the DD statement for 
the data set. 

Source: The DEVD operand can be supplied only in the DCB macro 
instruction. However, the optional operands can be supplied in the DCB 
macro instruction, the DCB subparameter of a DD statement, or by the 
problem program before completion of the data control block exit routine. 



DSORG= {PS} 
{PSU} 



•"TESTfSORG^operand specifies the organization of the data set and if the data set 
contains any location-dependent information that would make it unmovable. The 
following can be specified. 

PS Specifies a physical sequential data set. 

PSU Specifies a physical sequential data set that contains 

location-dependent information that would make it unmovable. 
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Source: The DSORG operand must be coded in the DCB macro instruction. 

EODAD=relexp 

The EODAD operand specifies the address of the routine given control when the 
end of an input data set is reached. Control is given to this routine when a 
READ macro instruction is issued and there are no additional input records to be 
retrieved. If the record format is RECFM=FS or FBS, the end-of-data condition 
is sensed when a file mark is read or when more data is requested after reading a 
truncated block. The end of data routine is entered when the CHECK macro 
instruction determines that the READ macro instruction reached the end of the 
data. If the end of the data set is reached but no EODAD address has been 
supplied, the task is abnormally terminated. See OS Data Management Services 
Guide for additional information on the EODAD routine. 

When the data set has been opened for UPDAT and volumes are to be switched, 
the problem program should issue a FEOV macro instruction after the EODAD 
routine has been entered. 

Source: The EODAD operand can be supplied in the DCB macro instruction or 
by the problem program before the end of the data set is reached. 

EXLST^relexp 

The EXLST operand specifies the address of the problem program exit list. The 

EXLST operand is required if the problem program requires additional processing 

for user labels, user totaling, data control block exit routine, end-of- volume, block 

count exits, to define a forms control buffer (FCB) image, or to use the DCB , 

ABEND exit for ABEND condition analysis. L 

R efer to Appendix D of this publication for the format and requirements of exit 
* Tist processing. For additional information about exit list processing, refer to OS 
Data Management Services Guide. 

Source: The EXLST operand can be supplied in the DCB macro instruction or by 
the problem program any time before the exit is required by the problem 
program. 

HIARCHY= {0} 

m 

The HIARCHY operand specifies the main-storage hierarchy in which the buffer 
pool is constructed. The following describes the characters that can be specified. 

— Specifies that the buffer pool is constructed in processor storage. 

1 — Specifies that the buffer pool is constructed in IBM 2361 Core Storage. 

The HIARCHY operand can also be specified in the HIARCHY operand of a 
GETPOOL macro instruction. If the HIARCHY operand is omitted from all 
sources, the buffer pool is constructed in processor storage. 
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The buffer pool is constructed in the user region or partition within the indicated 
hierarchy; if space is not available in the indicated hierarchy, the task is 
abnormally terminated. The HIARCHY operand is ignored in systems that do not 
have hierarchy support. The HIARCHY operand must not be specified for MVT 
systems with Model 65 multiprocessing. 

Source- The HIARCHY operand can be supplied in the DCB macro instruction, 
in the DCB subparameter of a DD statement, or in the HIARCHY operand of a 
GETPOOL macro instruction. 

KEYLEN=absexp (maximum value is 255) 

The KEYLEN operand specifies the length, in bytes, for the key associated with 
each data block in a direct-access device data set. If the key length is not 
supplied from any source before completion of the data control block exit routine, 
a ke y length of zero (no keys) js ^assumed. 

Source- The KEYLEN operand can be supplied in the DCB macro instruction, in 
the DCB subparameter of a DD statement, by the problem program before the 
completion of the data control block exit routine, or by the data set label of an 
existing data set. 

LRECL= { absexp ) 
{X} 

The LRECL operand specifies the length, in bytes, for fixed-length records, or it 
specifies the maximum length, in bytes, for variable-length records. LRECL=X is 
used for variable-length spanned records that exceed 32,756 bytes. Except when 
variable-length spanned records are used, the value specified for the LRECL 
operand cannot exceed the value specified for the BLKSIZE operand. 

Except when variable-length spanned records are used, the LRECL operand can 
be omitted for BSAM; the system uses the value specified in the BLKSIZE 
operand. If the LRECL value is coded, it is coded as described in the following. 

For fiv*rU™ P th re™rH<: that are unblocked , the value specified in the LRECL 
operand should be equal to the value specified in the BLKSIZE operand. For 
blocked fixed-length records, the value specified in the LRECL operand should be 
evenly divisible into the value specified in the BLKSIZE operand. 

For variable-le ngth records , the value specified in LRECL must include the 
maximum data length (up to 32,752 bytes) plus 4 bytes for the RDW. 

For undefined-length records, the LRECL operand should be omitted; the actual 
length can be supplied dynamically in a READ/WRim macro instruction. (^hen_ 
an undefined-length record is read, the actual length o f fhf W rord IS returned by 
"Ihely stem in the DCBLRECL field of the data control block/. 
When BSAM is used to create a BDAM data set with variable-length spanned 
records the LRECL value should be the maximum data length (up to 32,752) 
plus four bytes for the record descriptor word (RDW), or if the logical record 
length is greater than 32,756 bytes, LRECL=X is specified. 
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Source: The LRECL operand can be supplied in the DCB macro instruction, in 
the DCB subparameter of a DD statement, by the problem program before 
completion of the data control block exit routine, or by the data set label of an 
existing data set. 

MACRF={(R [CD \ 

[P] 

«w [CD } 

[P] 

[L] 

{(R [C],W {€])} 

The MACRF operand specifies the type of macro instructions (READ, WRITE, 
CNTRL, and NOTE/POINT) that are used with the data set being created or 
processed. The BSAM MACRF operand also provides the special form 
(MACRF=WL) for creating a BDAM data set. The MACRF operand can be 
coded in any of the forms shown above. The following characters can be coded: 

C — Specifies that the CNTRL macro instruction is used with the data set. 
If C is specified to be used with a card reader , a CNTRL m acro 
instruction must follow every input request. 

L — Specifies that BSAM is used to create a BDAM data set. This 

character can be specified only in the combination MACRF=WL. 

P — Specifies that POINT macro instructions are used with the data set 

being created or processed. Specifying P in the MACRF operand also 

automatically provides the capability of using NOTE macro 

instructions with the data set. V..-> 

R — Specifies that READ macro instructions are used. 

W — Specifies that WRITE macro instructions are used. 

Note: Each ^READ and WRITE macro instruction issued in the problem program 
must be checked for com pletion by a CHECK macro instruction. 

Source: The MACR F operand m ust be specified in the DCB macro instruction. 

NCP= absexp (maximum value is 99) 

The NCP operand specifies the maximum number of READ/WRITE macro 
instructions that will be issued before the first CHECK macro instruction is issued 
to test for completion of the I/O operation. The maximum number may be less 
than 99 depending on the limit established when the operating system is 
generated. If chained scheduling is specified (OPTCD=C), NCP must be 
specified as more than one. If the NCP operand is omitted, one is assumed. 

Source: The NCP operand can be supplied in the DCB macro instruction, in the 
DCB subparameter of a DD statement, or by the problem program before an 
OPEN macro instruction is issued to open the data set. 
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OPTCD= {B } [Tl 
{C } 
[H } 

iQ } 
iv J 

{UC } 
{W } 
{WC} 
{Z } 
|ZC } 

The OPTCD operand specifies the optional services that are used with the BSAM 
data set. Two of the optional services (OPTCD=B and OPTCD=H) cannot be 
specified in the DCB macro instruction. They are requested in the DjCJL. 
subparameter of a DP statemen t. Since all optional services requests must be 
supplied by the same source, tne OPTCD operand must be omitted from the DCB 
macro instruction if either of these options is requested in a DD statement. The 
following describes the characters that can be specified; these characters can be 
specified in any order (in one of the combinations shown above), and no commas 
are required between characters. 

C — Requests that chained scheduling b e used. OPTCD=C cannot be 
specified if BFTEK=R is specified for the same data control block. 
Also, chained scheduling cannot be specified for associated data sets or 
printing on a 3525. 

Q — Requests that ASCII tape records in an input data set be converted to 
EBCDIC code after the input record has been read, or it requests that 
an output record in EBCDIC code be converted to ASCII code before 
the record is written. 

T — Requests the user totaling facility. If this facility is requested, the 

EXLST operand should specify the address of an exit list to be used. 

U — Specified only for a printer with the universal character set (UCS) 
feature. This option unblocks data checks (permits them to be 
recognized as errors) and allows analysis by the appropriate error 
analysis routine (SYNAD routine). If the U option is omitted, data 
checks are not recognized as errors. 

W — Specifies that the system performs a validity check on each record 

written on a direct-access device. If the device is a 2321 data cell, the 
system performs a validity check for each write operation whether it is 
requested or not. 

Z — For magnetic tape, input only, the Z option requests the system to 

shorten its normal error recovery procedure to consider a data check as 
a permanent I/O error after five unsuccessful attempts to read a 
record. This option is available only if it is selected when the 
operating system is generated. OPTCD=Z is used when a tape is 
known to contain errors and there is no need to process every record. 
The error analysis routine (SYNAD) should keep a count of permanent 
errors and terminate processing if the number becomes excessive. 
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For direct-access devices only, the Z option requests the system to use 
the search direct option to accelerate the input operations for a data 
set. OPTCD=Z cannot be specified when RECFM=UT, FS, FBT, VS, 
or VBS. 

Note: The following describes the optional services that can be requested in the 
DCB subparameter of a DD statement. If either of these options is requested, the 
complete OPTCD operand must be supplied in the DD statement. 

B — If OPTCD=B is specified in the DCB subparameter of a DD 

statement, it forces the end-of-volume (EOV) routine to disregard the 
end-of-file (EOF) recognition for magnetic tape. When this occurs, 
the EOV routine uses the number of volume serial numbers to 
determine end of file. For an input SL or AL tape, the EOV routine 
will treat EOF labels as EOV labels until the volume serial list is 
exhausted. When no more volumes are available, control is passed to 
the user's end-of-data routine. This option allows SL or AL tapes to 
be read out of order or to be concatenated to another tape using one 
DD statement. 

H — If OPTCD=H is specified in the DCB subparameter of a DD 

statement, it specifies that the DOS/OS interchange feature is being 
used with the data set. 

Source: The OPTCD operand can be supplied in the DCB macro instruction, in 
| the DCB subparameter of a DD statement, in the DSCB for direct-access devices, 
or by the problem program before an OPEN macro instruction is issued to open 
the data set. However, all optional services must be requested from the same 
source. 
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The RECFM operand specifies the record format and characteristics of the data 
set being created or processed. All the record formats shown above can be 
specified, but in those record formats that specify blocked records, the problem 
program must perform the blocking and deblocking of logical records; BSAM 
recognizes only data blocks. When RECFM is not specified, undefined format is 
assumed. The following describes the characters that can be specified: 

A — Specifies that the records in the data set contain American National 
Standards Institute (ANSI) control characters. Refer to Appendix E 
for a description of control characters. 
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B — Specifies that the data set contains blocked records. 

D — Specifies that the data set contains variable-length ASCII tape records. 

See OPTCD=Q and the BUFOFF operand for a description of how 

to specify ASCII data sets. 

F _ Specifies that the data set contains fixed-length records. 

M — Specifies that the records in the data set contain machine code control 
characters. Refer to Appendix E for a description of control 
characters. RECFM=M cannot be used with ASCII data sets. 

s _ For fixed-length records, S specifies that the records are written as 

standard blocks; the data set does not contain any truncated blocks or 

unfilled tracks, with the exception of the last block or track in the data 

set. 

For variable-length records, S specifies that a record can span more 

than one block. Spanned records can be read (reading a BDAM data 

set) or written (creating a BDAM data set) using BSAM. 

T — Specifies that the track-overflow feature is used with the data set. The 
track-overflow feature allows a record to be written partially on one 
track of a direct-access device and the remainder of the record written 
on the following track (if required). Chained scheduling cannot be 
used if the track-overflow feature is used. 
U _ Specifies that the data set contains undefined-length records. 
V — Specifies that the data set contains variable-length records. 

Note: RECFM=V cannot be specified for a card reader data set or an 
ASCII tape data set. 
Note- The record format RECFM=VBS does not provide the spanned record 
function; if this format is used, the problem program must block and segment the 
records. 

Source: The RECFM operand can be supplied in the DCB macro instruction, in 
the DCB subparameter of a DD statement, by the problem program before 
completion of the data control block exit routine, or by the data set label ol an 
existing data set. 
SYNAD=relexp 

The SYNAD operand specifies the address of the error analysis (SYNAD) routine 
to be given control when an uncorrectable input/output error occurs. The 
contents of the registers when the error analysis routine is given control are 
described in Appendix A of this publication. 
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The error analysis routine must not use the save area pointed to by register 13, fjf 

because this area is used by the system. The system does not restore registers V^ 

when it regains control from the error analysis routine. The error analysis routine 

can issue a RETURN macro instruction which uses the address in register 14 to 

return control to the system. If control is returned to the system, the system 

returns control to the problem program and proceeds as though no error had been 

encountered. 

If the SYNAD operand is omitted, the task is abnormally terminated when an 
uncorrectable input/output error occurs. 

Source: The SYNAD operand can be supplied in the DCB macro instruction or 
by the problem program. The problem program can also change the error routine 
address at any time. 
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DCB— Construct a Data Control Block (QISAM) 



o 



The data control block for a queued indexed sequential access method (QISAM) data 
set is constructed during assembly of the problem program. The DCB macro 
instruction must not be coded within the first 16 bytes of a control section (CSECT) 
The DSORG and MACRF operands must be coded in the DCB macro instruction, but 
the other DCB operands can be supplied from other sources. Each QISAM DCB 
operand description contains a heading, "Source." The information under this heading 
describes the sources which can supply the operand to the data control block. 
Before a DCB macro instruction for a QISAM data set is coded, the following 
characteristics of QISAM should be considered: 

. The characteristics of a QISAM data set are established when the data set is 

created- these characteristics cannot be changed without reorganizing the data set. 
The following DCB operands establish the characteristics of the data set and can 
be coded only when creating the data set: BLKSIZE, CYLOFL, KEYLEN, 
LRECL, NTM, OPTCD, RECFM, and RKP. 

. The data set can contain the following record formats: Unblocked fixed-length 
records (F), blocked fixed-length records (FB), unblocked variable-length records 
(V), or blocked variable-length records (VB). 

QISAM can create an indexed sequential data set (QISAM, load mode), add 
additional data records at the end of the existing data set (QISAM, resume load 
mode), update a record in place, or retrieve records sequentially (QISAM, scan 
mode). 
The track-overflow feature cannot be used to create an ISAM data set. 

. When an indexed sequential data set is being created, space for the prime area of 
the data set, the overflow area of the data set, and the cylinder/master index(es) 
for the data set can be allocated on the same or separate volumes. For 
information about space allocation, refer to OS Job Control Language Reference 
manual. 

. The system automatically creates one track index for each cylinder in the data set 
and one cylinder index for the entire data set. The DCB NTM and OPTCD 
operands can be specified to indicate that the data set requires a master index(es); 
the system creates and maintains up to three levels of master indexes. OS Data 
Management Services Guide contains additional information about indexes for 
indexed sequential data sets. 

. A record deletion option can be specified (OPTCD=L) when the ISAM data set 
is created. This option allows a record to be flagged for deletion by placing a 
hexadecimal value of 'FF' in the first data byte of the record (first byte of a 
fixed-length record or fifth byte of a variable-length record). Records marked for 
deletion are ignored during sequential retrieval by QISAM. 

Reorganization statistics can be obtained by specifying OPTCD=R when the 
ISAM data set is created. These statistics can be used by the problem program to 
determine the status of the overflow areas allocated to the data set. 
Reorganization of ISAM data sets is described in OS Data Management 
Services Guide. 
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• When an ISAM data set is created, the records must be written with the keys in 
ascending order. 

These characteristics of queued indexed sequential access method data sets are 
described in more detail in OS Data Management Services Guide. 

The following describes the DCB operands that can be specified when a QISAM data 
set is being created or processed. 

BFALN= {F} 

& 

The BFALN operand specifies the alignment of each buffer in the buffer pool 
when the buffer pool is constructed automatically or by a GETPOOL macro 
instruction. If the BFALN operand is omitted, the system provides doubleword 
alignment for each buffer. The following describes the characters that can be 
specified: 

F — Specifies that each buffer is on a fullword boundary that is not also a 
doubleword boundary. 

D — Specifies that each buffer is on a doubleword boundary. 

If the BUILD macro instruction is used to construct the buffer pool, the problem 
program must provide a main-storage area for the buffers and control buffer 
alignment. 

Source: The BFALN operand can be supplied in the DCB macro instruction, in 
| the DCB subparameter of a DD statement or by the problem program before 
completion of the data control block exit routine. 

BLKSIZE= absexp (maximum value is device-dependent) 

The BLKSIZE operand specifies the length, in bytes, for each data block when 
fixed-length records are used, or it specifies the maximum length in bytes, for 
each data block when variable-length records are used. The BLKSIZE operand 
must be specified when an ISAM data set is created. When an existing ISAM 
data set is processed, the BLKSIZE operand must be omitted (it is supplied by the 
data set label). 

Track capacity of the direct-access device being used must be considered when 
the BLKSIZE for an ISAM data set is specified. For fixed-length records, the 
sum of the key length, data length, and device overhead plus 10 bytes (for ISAM 
use) must not exceed the capacity of a single track on the direct-access device 
being used. For variable-length records the sum of the key length, 
block-descriptor word length, record-descriptor word length, data length, and 
device overhead plus 10 bytes (for ISAM use) must not exceed the capacity of a 
single track on the direct-access device being used. Device capacity and device 
overhead are described in Appendix C of this publication. For additional 
information about device capacity and space allocation, refer to OS Data 
Management Services Guide. 

If fixed-length records are used, the value specified in the BLKSIZE operand must 
be an integral multiple of the value specified in the LRECL operand. 
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Source: When an ISAM data set is created, the BLKSIZE operand can be 
supplied in the DCB macro instruction, in the DCB subparameter of a DD 
statement, or by the problem program before completion of the data control block 
exit routine. When an existing ISAM data set is processed, the BLKSIZE operand 
must be omitted from the other sources, allowing the data set label to supply the 
value. 

BUFCB= relexp 

The BUFCB operand specifies the address of the buffer pool control block 
constructed by a BUILD macro instruction. 

If the system constructs the buffer pool automatically or if the buffer pool is 
constructed by a GETPOOL macro instruction, the system places the address of 
the buffer pool control block into the data control block, and the BUFCB operand 
should be omitted. 

Source: The BUFCB operand can be supplied in the DCB macro instruction or 
by the problem program before completion of the data control block exit routine. 

BUFL= absexp (maximum value is 32,760) 

The BUFL operand specifies the length, in bytes, of each buffer in the buffer pool 
when the buffer pool is constructed by a BUILD or GETPOOL macro 
instruction. When the data set is opened, the system computes the minimum 
buffer length required and verifies that the length in the buffer pool control block 
is equal to or greater than the minimum length required. The system then inserts 
the computed length into the data control block. 

The BUFL operand is not required for QISAM if the system acquires buffers 
automatically; the system computes the minimum buffer length required and 
inserts the value into the data control block. 

If the buffer pool is constructed with a BUILD or GETPOOL macro instruction, 
additional space is required in each buffer for system use. For a description of 
the buffer length required for various ISAM operations, refer to OS Data 
Management Services Guide. 

Source: The BUFL operand can be supplied in the DCB macro instruction, in the 
DCB subparameter of a DD statement, or by the problem program before 
completion of the data control block exit routine. 

BUFNO= absexp (maximum value is 255) 

The BUFNO operand specifies the number of buffers to be constructed by a 
BUILD macro instruction, or it specifies the number of buffers to be acquired 
automatically by the system. If the BUFNO operand is omitted, the system 
automatically acquires two buffers. 

If the GETPOOL macro instruction is used to construct the buffer pool, the 
BUFNO operand is not required. 

Source: The BUFNO operand can be supplied in the DCB macro instruction, in 
the DCB subparameter of a DD statement, or by the problem program before 
completion of the data control block exit routine. 
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CYLOFL= absexp (maximum value is 99) 

The CYLOFL operand specifies the number of tracks on each cylinder that is \^S 

reserved as an overflow area. The overflow area is used to contain records that 

are forced off prime area tracks when additional records are added to the prime 

area track in ascending key sequence. ISAM maintains pointers to records in the 

overflow area so that the entire data set is logically in ascending key sequence. 

Tracks in the cylinder overflow area are used by the system only if OPTCD=Y is 

specified. For a more complete description of the cylinder overflow area, refer to 

the space allocation section of OS Data Management Services Guide. 

Source: When an ISAM data set is created, the CYLOFL operand can be 
supplied in the DCB macro instruction, in the DCB subparameter of a DD 
statement, or by the problem program before completion of the data control block 
exit routine. When an existing ISAM data set is processed, the CYLOFL operand 
must be omitted, allowing the data set label to supply the operand. 

DDNAME=symbol 

The DDNAME operand specifies the name used to identify the job control 
language data definition (DD) statement that defines the data set being created or 
processed. 

Source: The DDNAME operand can be supplied in the DCB macro instruction or 
by the problem program before an OPEN macro instruction is issued to open the 
data set. 



DSORG= {IS} 
{ISU} 

The DSORG operand specifies the organization of the data set and if the data set 
contains any location-dependent information that would make it unmovable. The 
following characters can be specified. 

IS — Specifies an indexed sequential data set organization. 

ISU — Specifies an indexed sequential data set that contains 

location-dependent information. ISU can be specified only when an 
ISAM data set is created. 

Source: The DSORG operand must be specified in the DCB macro instruction. 
When an ISAM data set is created, DSORG=IS or ISU must also be specified 
in the DCB subparameter of the corresponding DD statement. 

EODAD=relexp 

The EODAD operand specifies the address of the routine to be given control 
when the end of an input data set is reached. For ISAM, this operand would 
apply only to scan mode when a data set is open for an input operation. Control 
is given to this routine when a GET macro instruction is issued and there are no 
more input records to retrieve. For additional information on the EODAD 
routine, see OS Data Management Services Guide. 

Source: The EODAD operand can be supplied in the DCB macro instruction or 
by the problem program before the end of the data set is reached. 

EXLST=relexp 

The EXLST operand specifies the address of the problem program exit list. The 
EXLST operand is required only if the problem program uses the data control 
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block exit routine for additional processing or if the DCB ABEND exit is used for 
ABEND condition analysis. 

Refer to Appendix D of this publication for the format and requirements for exit 
list processing. For additional information about exit list processing, refer to OS 
Data Management Services Guide. 

Source: The EXLST operand can be supplied in the DCB macro instruction or by 
the problem program before the associated exit is required. 

HIARCHY= {0} 

m 

The HIARCHY operand specifies the main-storage hierarchy in which the buffer 
pool is constructed. The following describes the characters that can be specified. 

— Specifies that the buffer pool is constructed in processor storage. 

1 — Specifies that the buffer pool is constructed in IBM 2361 Core Storage. 

The HIARCHY operand can also be specified in a GETPOOL macro instruction. 
If the HIARCHY operand is omitted from all sources, the buffer pool is 
constructed in processor storage. 

The buffer pool is constructed within the user region or partition within the 
indicated hierarchy; if space is not available within the indicated hierarchy, the 
task is abnormally terminated. The HIARCHY operand is ignored in systems that 
do not have hierarchy support. The HIARCHY operand must not be specified for 
MVT systems with Model 65 multiprocessing. 

Source: The HIARCHY operand can be supplied in the DCB macro instruction, 
in the DCB subparameter of a DD statement, or in the HIARCHY operand of a 
GETPOOL macro instruction. 

KEYLEN =absexp (maximum value is 255) 

The KEYLEN operand specifies the length, in bytes, of the key associated with 
each record in an indexed sequential data set. When block records are used, the 
key of the last record in the block (highest key) is used to identify the block. 
However, each logical record within the block has its own identifying key which 
ISAM uses to access a given logical record. 

Source: When an ISAM data set is created the KEYLEN operand can be supplied 
in the DCB macro instruction, in the DCB subparameter of a DD statement, or 
by the problem program before completion of the data control block exit routine. 
When an existing ISAM data set is processed, the KEYLEN operand must be 
omitted, allowing the data set label to supply the key length value. 

LRECL=absexp (maximum value is device-dependent) 

The LRECL operand specifies the length, in bytes, for fixed-length records, or it 
specifies the maximum length, in bytes, for variable-length records. The value 
specified in the LRECL operand cannot exceed the value specified in the 
BLKSIZE operand. When fixed unblocked records are used and the relative key 
position (as specified in the RKP operand) is zero, the value specified in the 
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LRECL operand should include only the data length (the key is not written as 
part of the fixed, unblocked record when RKP=0). 

The track capacity of the direct-access device being used must be considered if 
maximum length logical records are being used. For fixed-length records, the sum 
of the key length, data length, and device overhead plus 10 bytes (for ISAM use) 
must not exceed the capacity of a single track on the direct-access device being 
used. For variable-length records, the sum of the key length, data length, device 
overhead, block-descriptor-word length, and record-descriptor-word length plus 
10 bytes (for ISAM use) must not exceed the capacity of a single track on the 
direct-access device being used. Device capacity and device overhead are 
described in Appendix C of this publication. For additional information about 
device capacity and space allocation, refer to OS Data Management Services 
Guide. 

Source: When an ISAM data set is created, the LRECL operand can be supplied 
in the DCB macro instruction, in the DCB subparameter of a DD statement, or 
by the problem program before completion of the data control block exit routine. 
When an existing ISAM data set is processed, the LRECL operand must be 
omitted, allowing the data set label to supply the value. 

MACRF= {(PM) \ 

KPL) } 

KGM[,S [K]]) } 
[I] 

KGL[,S [K]J[,PU]) } 

ra \ ^ 

The MACRF operand specifies the type of macro instructions, the transmittal V , ^ 

mode, and type of search to be used with the data set being processed. The 
operand can be coded in any of the combinations shown above; the following 
describes the characters that can be coded. 

The following characters can be specified only when the data set is being created 
(load mode) or additional records are being added to the end of the data set 
(resume load). 

PL — Specifies that PUT macro instructions are used in the locate transmittal 
mode; the system provides the problem program with the address of a 
buffer containing the data to be written into the data set. 

PM — Specifies that PUT macro instructions are used in the move transmittal 
mode; the system moves the data to be written from the problem 
program work area to the buffer being used. 

The following characters can be specified only when the data set is being 
processed (scan mode) or when records in an ISAM data set are being updated in 
place. 

GL — Specifies that GET macro instructions are used in the locate transmittal 
mode; the system provides the problem program with the address of a 
buffer containing the logical record read. 

GM — Specifies that GET macro instructions are used in the move mode; the 
system moves the logical record from the buffer to the problem 
program work area. 
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I — Specifies that actual device addresses (MBBCCHHR) are used to 

search for a record (or the first record) to be read. 
K — Specifies that a key or key class is used to search for a record (or the 

first record) to be read. 
PU — Specifies that PUTX macro instructions are used to return updated 

records to the data set. 
s _ Specifies that SETL macro instructions are used to set the beginning 

location for processing the data set. 
Source: The MACRF operand must be coded in the DCB macro instruction. 
NTM= absexp (maximum value is 99) 

The NTM operand specifies the number of tracks to be contained in a cylinder 
index before a higher-level index is created. If the cylinder index exceeds this 
number, a master index is created by the system; if a master index exceeds this 
number the next level of master index is created. The system creates up to three 
levels of master indexes. The NTM operand is ignored unless the master index 
option (OPTCD=M) is selected. 

Source: When an ISAM data set is being created, the NTM operand can be 
supplied in the DCB macro instruction, in the DCB subparameter of a DD 
statement, or by the problem program before completion of the data control block 
exit routine. When an ISAM data set is being processed, master index 
information is supplied to the data control block from the data set label, and the 
NTM operand must be omitted. 

OPTCD= [I][L][M][R][U][W][Y] 

The OPTCD operand specifies the optional services performed by the system 
when an ISAM data set is being created. The following describes the characters 
that can be specified; these characters can be specified in any order, and no 
commas are required between characters. 
I — Specifies that the system uses the independent overflow areas to 

contain overflow records. Allocated independent overflow areas are 
not used unless OPTCD=I is specified. 
L — Specifies that the data set will contain records flagged for deletion. A 
record is flagged for deletion by placing a hexadecimal value of 'FF' in 
the first data byte. Records flagged for deletion remain in the data set 
until the space is required for another record to be added to the track. 
Records flagged for deletion are ignored during sequential retrieval of 
the ISAM data set (QISAM, scan mode). This option cannot be 
specified for blocked fixed-length records if the relative key position is 
zero (RKP=0), or it cannot be specified for variable-length records if 
the relative key position is four (RKP=4). 

When an ISAM data set is being processed with BISAM, a record with 
a duplicate key can be added to the data set (WRITE KN macro 
instruction), only when OPTCD=L has been specified and the original 
record (the one whose key is being duplicated) has been flagged for 
deletion. 
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M — Specifies that the system creates and maintains a master index(es) 
according to the number of tracks specified in the NTM operand. 

R — Specifies that the system places reorganization statistics in the 

DCBRORG1, DCBRORG2, and DCBRORG3 fields of the data 
control block. The problem program can analyze these statistics to 
determine when to reorganize the data set. If the OPTCD operand is 
omitted completely, the reorganization statistics are automatically 
provided. However, if the OPTCD operand is supplied, OPTCD=R 
must be specified to obtain the reorganization statistics. 

U — Specifies that the system accumulates track index entries in main 

storage and writes them as a group for each track of the track index. 
OPTCD =U can be specified only for fixed-length records. The entries 
are written in fixed-length unblocked format. 

W — Specifies that the system performs a validity check on each record 
written. If the device is a 2321 data cell, the system performs a 
validity check for each write operation whether it is requested or not. 

Y — Specifies that the system uses the cylinder overflow area(s) to contain 

overflow records. If OPTCD=Y is specified, the CYLOFL operand 
specifies the number of tracks to be used for the cylinder overflow 
area. The reserved cylinder overflow area is not used unless 
OPTCD=Y is specified. 

Source: When an ISAM data set is created, the OPTCD operand can be supplied 
in the DCB macro instruction, in the DCB subparameter of a DD statement, or 
by the problem program before an OPEN macro instruction is issued to open the 
data set. However, all optional services must be requested from the same source. 
When an existing ISAM data set is processed, the optional service information is 
supplied to the data control block from the data set label, and the OPTCD 
operand must be omitted. 

RECFM= [YIB]} 
MB]} 

The RECFM operand specifies the format and characteristics of the records in the 
data set. If the RECFM operand is omitted, variable-length records (unblocked) 
are assumed. The following describes the characters that can be specified. 

B — Specifies that the data set contains blocked records. 

F — Specifies that the data set contains fixed-length records. 

V — Specifies that the data set contains variable-length records. 

Source: When an ISAM data set is created, the RECFM operand can be supplied 
in the DCB macro instruction, in the DCB subparameter of a DD statement, or 
by the problem program before an OPEN macro instruction is issued to open the 
data set. When an existing ISAM data set is processed, the record format 
information is supplied by the data set label, and the RECFM operand must be 
omitted. 
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RKP= absexp 

The RKP operand specifies the relative position of the first byte of the key within 
each logical record. For example, if RKP=9 is specified, the key starts in the 
tenth byte of the record. The delete option (OPTCD=L) cannot be specified if 
the relative key position is the first byte of a blocked fixed-length record or the 
fifth byte of a variable-length record. If the RKP operand is omitted, RKP=0 is 
assumed. 

If unblocked fixed-length records with RKP=0 are used, the key is not written as 
a part of the data record, and the delete option can be specified. If blocked 
fixed-length records are used, the key is written as part of each data record; either 
RKP must be greater than zero or the delete option must not be used. 

If variable-length records (blocked or unblocked) are used, RKP must be four or 
greater if the delete option is not specified; if the delete option is specified, RKP 
must be specified as five or greater. The four additional bytes allow for the block 
descriptor word in variable-length records. 

Source: When an ISAM data set is created, the RKP operand can be supplied in 
the DCB macro instruction, in the DCB subparameter of a DD statement, or by 
the problem program before completion of the data control block exit routine. 
When an existing ISAM data set is processed, the RKP information is supplied 
by the data set label and the RKP operand must be omitted. 

SYNAD= relexp 

The SYNAD operand specifies the address of the error analysis routine given 
control when an uncorrectable input/output error occurs. The contents of the 
registers when the error analysis routine is given control are described in 
Appendix A of this publication. 

The error analysis routine must not use the save area pointed to by register 13, 
because this area is used by the system. The system does not restore registers 
when it regains control from the error analysis routine. The error analysis routine 
can issue a RETURN macro instruction which uses the address in register 14 to 
return control to the system. When control is returned in this manner, the system 
returns control to the problem program and proceeds as though no error had been 
encountered; if the error analysis routine continues processing, the results may be 
unpredictable. 

For ISAM data sets, if the error analysis routine receives control from the Close 
routine, bit 3 of the IOBFLAG1 field in the input/output block is set to one. In 
this case, the error analysis routine must not issue a CLOSE macro instruction. 
To complete close processing, the error analysis routine must return control to the 
Close routine with a branch to the address in register 14. 

Source: The SYNAD operand can be supplied in the DCB macro instruction or 
by the problem program. The problem program can also change the error analysis 
routine address at any time. 
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DCB— QSAM 

DCB— Construct a Data Control Block (QSAM) 

The data control block for the queued sequential access method (QSAM) is constructed 
during assembly of the problem program. The DCB macro instruction must not be 
coded within the first 16 bytes of a control section (CSECT). The DSORG and 
MACRF operands must be coded in the DCB macro instruction, but the other DCB 
operands can be supplied, to the data control block, from other sources. Each DCB 
operand description contains a heading, "Source." The information under this heading 
describes the sources from which the operand can be supplied. 

Before a DCB macro instruction for creating or processing a QSAM data set is coded, 
the following characteristics of QSAM data sets should be considered. 

• All record formats can be processed. 

• Automatic blocking and deblocking of records is provided. 

• Automatic buffer control is provided; this function fills input buffers when they 
are empty and writes output buffers when they are full. 

• A logical record interface is provided; a GET macro instruction retrieves the next 
sequential logical record from the input buffer, and a PUT macro instruction 
places the next sequential logical record in the output buffer. 

• I/O operations are synchronized automatically. 

• Four transmittal modes ( move , lQcate. 4aJa, and substitute ) are provided. These 
transmittal modes provide flexibility in buffer management and data movement 
between buffers. 

• Keys for direct-access device records cannot be read or written using QSAM. 

• Specifying the DEVD operand^ in the DCB macro instruction can cause the 
program to be device-dependent. 

These characteristics of queued sequential access method data sets are described in 
more detail in OS Data Management Services Guide. 

The following describes the operands that can be specified in the DCB macro 
instruction for a QSAM data set. 

BFALN= {F} 

The BFALN operand specifies the boundary alignment of each buffer in the 
buffer pool when the buffer pool is constructed automatically or by a GETPOOL 
macro instruction. If the BFALN operand is omitted, the system provides 
doubleword alignment for each buffer. 

If the data set being created or processed contains ASCII tape records with a 
block prefix, the block prefix is entered at the beginning of the buffer, and data 
alignment depends on the length of the block prefix. For a description of how to 
specify the block prefix length, refer to the BUFOFF operand. 
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The following describes the characters that can be specified. /"""N 

F — Specifies that each buffer is on a fullword boundary that is not also a V^ 

doubleword boundary. 

D — Specifies that each buffer is on a doubleword boundary. 

When exchange buffering (BFTEK =E) is specified and the records are in blocked 
fixed-length format, each buffer segment is aligned as specified in the BFALN 
operand. 

If the BUILD macro instruction is used to construct the buffer pool, the problem 
program must control buffer alignment. 

Source: The BFALN operand can be supplied in the DCB macro instruction, in 
| the DCB subparameter of a DD statement or by the problem program before 
completion of the data control block exit routine. If both the BFALN and 
BFTEK operands are specified, they must be supplied from the same source. 



BFTEK= {S} 
{A} 



The BFTEK operand specifies the buffering technique that is used when the 
QSAM data set is created or processed. If the BFTEK operand is omitted, simple 
buffering is assumed. The following describes the characters that can be 
specified. 



S — Specifies that simple buffering is used. 

/^ 
E — Specifies that exchange buffering is used. Exchange buffering can be L 

used only with record formats (RECFM operand) F, FB, FBS, or FS; 

the track-overflow feature cannot be used with exchange buffering. If 
exchange buffering is used with ASCII tape records, the BUFOFF 
operand must be zero (no block prefix). 

A — Specifies that a logical record interface is used for variable-length 
spanned records. When BFTEK=A is specified, the Open routine 
acquires a record area equal to the length specified in the LRECL field 
plus 32 additional bytes for control information. When a logical 
record interface is requested, the system uses the simple buffering 
technique. 

To use the simple or exchange buffering technique efficiently, the user should be 
familiar with the four transmittal modes for QSAM and the buffering techniques 
as described in OS Data Management Services Guide. 

Source: The BFTEK operand can be supplied in the DCB macro instruction, in 
the DCB subparameter of a DD statement, or by the problem program before 
completion of the data control block exit routine. If both the BFTEK and 
BFALN operands are specified, they must be supplied from the same source. 

BLKSIZE= absexp (maximum value is 32,760) 

The BLKSIZE operand specifies the length, in bytes, of a data block for 
fixed-length records, or it specifies the maximum length, in bytes, of a data block 
for variable-length or undefined-length records. 
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The actual value that can be specified in the BLKSIZE operand depends on the 
Lvice type and record format being used. Device capacity is shown in Appendix 
C of this publication. For additional information about device capacity, refer to 
05 Data Management Services Guide. For direct-access devices when the 
track-overflow feature is used or variable-length spanned records are being 
processed, the BLKSIZE operand can be up to the maximum value. For other 
record formats used with direct-access devices, the value specified in the 
BLKSIZE operand cannot exceed the capacity of a single track. 
Since QSAM provides a logical record interface, the device capacities shown in 
Appendix C also apply to a maximum length logical record. One exception to the 
de P 4e capacity Ja" logical record is the size of variable-length spanned records. 
Their length can exceed the value specified in the BLKSIZE operand (see the 
description of the LRECL operand). 

If fixed-length records are used for a SYSOUT data set, the value specified in the 
BLKSIZE operand must be an integral multiple of the value specified in the 
LRECL opeLd; otherwise, the system will adjust the blocksize downward to the 
nearest multiple. If the records are unblocked fixed-length records, the .value 
specified in the BLKSIZE operand must equal the value specified in the LRLLL 
operand if the LRECL operand is specified. 

If variable-length records are used, the value specified in the BLKSIZE operand 
must include the data length (up to 32,756 bytes) plus four bytes required for the 
block descriptor word (BDW). For format-D variable-length records, the 
minimum blocksize is 18 bytes and the maximum is 2048 bytes. 
If ASCII tape records with a block prefix are processed, the value specified in the 
BLKSIZE operand must also include the length of the block prefix. 
If variable-length spanned records are used, the value specified in the BLKSIZE 
operand can be the best one for the device being used or the processing being 
done When unit record devices (card or printer) are used, the system assume 
records are unblocked; the value specified for the BLKSIZE operand is equivalent 
Z one print Me or one card. A logical record that spans several blocks ,s written 
one segment at a time. 

If undefined-length records are used, the problem program ^^he actual 
record length into the DCBLRECL field. See the description of the LRECL 
operand. 

Source: The BLKSIZE operand can be supplied in the DCB macro instruction, in 
the DCB subparameter of a DD statement, by the problem program before 
completion of the data control block exit routine, or by the data set label of an 
existing data set. 
BVFCB=relexp 

The BUFCB operand specifies the address of the buffer pool control block 
constructed by a BUILD or BUILDRCD macro instruction. 

If the buffer pool is constructed automatically or by a GETPOOL macro 
instruction, the system places the address of the buffer pool control block into the 
data control block, and the BUFCB operand should be omitted. 
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Source: The BUFCB operand can be supplied in the DCB macro instruction or 
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by the problem program before completion of the data control block exit routine. V^/ 

BUFL= absexp (maximum value is 32,760) 

The BUFL operand specifies the length, in bytes, of each buffer in the buffer pool 
when the buffer pool is acquired automatically. The system acquires buffers with 
a length equal to the value specified in the BLKSIZE operand if the BUFL 
operand is omitted; if the problem program requires larger buffers, the BUFL 
operand is required. If the data set is for card image mode, the BUFL operand is 
specified as 160 bytes. The description of the DEVD operand contains a 
description of card image mode. 

If the data set contains ASCII tape records with a block prefix, the value specified 

in the BUFL operand must also include the length of the block prefix. # 

If the buffer pool is constructed by a BUILD, BUILDRCD, or GETPOOL macro 
instruction, the BUFL operand is not required. 

Source: The BUFL operand can be supplied in the DCB macro instruction, in the 
DCB subparameter of a DD statement, or by the problem program before 
completion of the data control block exit routine. 

BUFNO= absexp (maximum value is 255) 

The BUFNO operand specifies the number of buffers in the buffer pool 

constructed by a BUILD or BUILDRCD macro instruction, or it specifies the 

number of buffers to be acquired automatically. If the BUFNO operand is 

omitted and the buffers are acquired automatically, the system acquires three /f x 

buffers if the device is a 2540 card read punch or two buffers for any other \ y 

device type. 

If the buffer pool is constructed by a GETPOOL macro instruction, the BUFNO 
operand is not required. 

Source: The BUFNO operand can be supplied in the DCB macro instruction, in 
the DCB subparameter of a DD statement, or by the problem program before 
completion of the data control block exit routine. 

BUFOFF= { absexp } 

m 

The BUFOFF operand specifies the length, in bytes, of the block prefix used with 
ASCII tape data sets. When QSAM is used to read ASCII tape records, only the 
data portion (or its address) is passed to the problem program; the block prefix is 
not available to the problem program. Block prefixes (except BUFOFF=L) 
cannot be included in QSAM output records. The following can be specified in 
the BUFOFF operand: 

absexp — Specifies the length, in bytes, of the block prefix. This value can be 
from to 99 for an input data set. The value must be for writing 
an output data set with fixed-length or undefined-length records. 

L — Specifies that the block prefix is 4 bytes long and contains the block 

length. BUFOFF=L is used when format-D records (ASCII) are 
processed. QSAM uses the four bytes as a block-descriptor word 
(BDW). 
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Source- The BUFOFF operand can be supplied in the DCB macro instruction, in 
the DCB subparameter of a DD statement, or by the problem program before an 
OPEN macro instruction is issued to open the data set. 

DDNAME=symbol 

The DDNAME operand specifies the name used to identify the job control 

language data definition (DD) statement that defines the data set being created or 

processed. 

Source: The DDNAME operand can be supplied in the DCB macro instruction or 

by the problem program before an OPEN macro instruction is issued to open the 

data set. 
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The DEVD operand specifies the device type on which the data set can or does 

reside. The device types above are shown with the optional operand(s) that can \^/ 

be coded when a particular device is used. The devices are listed in order of 

device-independence. For example, if DEVD=DA is coded in a DCB macro 

instruction (or the DEVD operand is omitted, which causes a default to DA), the 

data control block constructed during assembly could later be used for any of the 

other devices, but if DEVD=RD is coded, the data control block can be used only 

with a card reader or card reader punch. Unless you are certain that device 

interchangeability is not required, you should either code DEVD=DA or omit the 

operand and allow it to default to DA. 

If system input is directed to an intermediate storage device, the DEVD operand 
is omitted, and the job control language for the problem program must designate 
the system input to be used. Similarly, if system output is directed to an 
intermediate storage device, the DEVD operand is omitted, and the job control 
language for the problem program must designate the system output to be used. 

The following describes the device type and the optional operands that can be 
specified for each device type. 

DA — Specifies that the data control block can be used for a direct-access 
device (or any of the other device types described following DA). 

TA — Specifies that the data control block can be used for a magnetic tape 
data set (or any of the other device types described following TA). If 
TA is coded, the following optional operands can be coded: 



i 



DEN= {0} 

{2} 
{3} 

The DEN operand specifies the recording density in the number of 
bits-per-inch per track as shown in the following chart. 

DEN 7-TrackTape 9-Track Tape 9-Track Tape 9-Track Tape 

(Phase Encoded) Dual Density 



v_ / 






200 


1 


556 


2 


800 


3 


— 



800 — 800 (NRZI) 

— 1600 1600 (PE) 

NRZI is for non-return-to-zero-inverse mode 
PE is for phase encoded mode 

Specifying DEN=0 for a 7-track, 3420 tape will result in a 556 
bits-per-inch recording density, but corresponding messages and tape 
labels will indicate a 200 bits-per-inch recording density. 

If the DEN operand is not supplied by any source. The highest applicable 
density is assumed. 
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TRTCH= {C} 

m 

{ET} 

m 

The TRTCH operand specifies the recording K^™^ *^™^?, 
One of the above character combinations can be coded. If the IKiCH 
operand is omitted, odd parity with no translation or conversion is assumed. 
The following describes the characters that can be specified: 
C — Specifies that the data-conversion feature is used with odd parity 

and no translation. 
E — Specifies even parity with no translation or conversion. 

ET - Specifies even parity with BCDIC to EBCDIC translation 

required, but no data-conversion feature. 
T — Specifies that BCDIC to EBCDIC translation is required with 

odd parity and no data-conversion feature. 

PT Snecifies that the data control block is used for a paper tape device (or any 

" " SS^dLes following PT). If PT is coded, the following optional 

operand can be coded. 

CODE= {A} 

m 

ia 
m 
m 
w\ 

ro 

The CODE operand specifies the code in which the data was punched. The 

system converts these codes to EBCDIC code. If the CODE operand is not 

supplied by any source, CODE=I is assumed. The following describes the 

characters that can be specified. 

A — Specifies 8-track tape in ASCII code. 

B _ Specifies Burroughs 7-track tape. 

c _ Specifies National Cash Register 8-track tape. 

p Specifies Friden 8-track tape. 

I _ Specifies IBM BCD perforated tape and transmission code with 
8-tracks. 

N Specifies that no conversion required. 

T _ Specifies Teletype 1 5-track tape. 



1 Trademark of Teletype Corporation 
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PR — Specifies that the data control block is used for an on-line printer (or any of | 

the other device types following PR). If PR is coded, the following optional V^/ 

operand can be coded. 

PRTSP= {0} 
it] 
12} 

The PRTSP operand specifies the line spacing on the printer. This operand 
is not valid if the RECFM operand specifies either machine (RECFM=M) 
or ANSI (RECFM=A) control characters. If the PRTSP operand is not 
specified from any source, one is assumed. The following describes the 
characters that can be specified. 

— Specifies that spacing is suppressed (no space). 

1 — Specifies single-spacing. 

2 — Specifies double-spacing (one blank line between printed lines). 

3 — Specifies triple-spacing (two blank lines between printed lines). 

PC — Specifies that the data control block is used for a card punch (or any of the 
other device types following PC). If PC is coded, the following optional 
operands can be specified. 

MODE= [C] [R] 
[E] 

The MODE operand specifies the mode of operation for the card punch. ? r ^ 

The following describes the characters that can be specified. If the MODE V_,./ 

operand is omitted, E is assumed. 

C — Specifies that the cards are punched in card image mode. In card 
image mode, the 12 rows in each card column are punched from 
two consecutive bytes of main storage. Rows 12 through 3 are 
punched from the low-order 6 bits of one byte, and rows 4-9 are 
punched from the 6 low-order bits of the following byte. 

E — Specifies that cards are punched in EBCDIC code. 

R — Specifies that the program runs in read column eliminate mode 
(3505 card reader or 3525 card punch, read feature). 

Note: If the MODE operand is specified in the DCB subparameter of a DD 
statement, either C or E must be specified if R is specified. 

STACK= {1} 

12} 

The STACK operand specifies the stacker bin into which the card is placed 
after punching is completed. If this operand is omitted, stacker number 1 is 
used. The following describes the characters that can be specified: 

1 — Specifies stacker number 1. 

2 — Specifies stacker number 2. 
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FUNC= U } 

|PW[XT] } 

|RP[D] } 

|RW[T] } 

|RWP[XT][D] } 
*W[T] } 

The FUNC operand defines the type of 3525 card punch data sets that are 
used If the FUNC operand is omitted from all sources, a data set opened 
for input defaults to read only, and a data set opened for output defaults to 
punch only. The following describes the characters that can be specified in 
the FUNC operand. 

D _ Specifies that the data protection option is to be used. The data 
protection option prevents punching information into card 
columns that already contain data. When the data protection 
option is used, an 80-byte data protection image (DPI) must have 
been previously stored in SYS1.IMAGELIB. Data protection 
applies only to the output punch portion of a read and punch or 
read, punch, and print operation. 

I — Specifies that the data in the data set is to be punched into cards 
and printed on the cards; the first 64 characters are printed on 
line 1 of the card and the remaining 16 characters are printed on 
line 3. 

p _ Specifies that the data set is for punching cards. See the 

description of the character X for associated punch and print data 
sets. 

R — Specifies that the data set is for reading cards. 

T — Specifies that the two-line option is used. The two-line print 

option allows two lines of data to be printed on the card (lines 1 
and 3). If T is not specified, the multiline print option is used; 
this allows printing on all 25 possible print lines. In either case, 
the data printed may be the same as the data punched in the 
card, or it may be entirely different data. 

w _ Specifies that the data set is for printing. See the description of 
the character X for associated punch and print data sets. 

X — Specifies that an associated data set is opened for output for both 
punching and printing. Coding the character X is used to 
distinguish the 3525 printer output data set from the 3525 punch 
output data set. 

Note- If data protection is specified, the data protection image (DPI) must 
be specified in the FCB subparameter of the DD statement for the data set. 
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RD — Specifies that the data control block is used with a card reader or card read 
punch. If RD is specified, the data control block cannot be used with any 
other device type. When RD is coded, the following optional operands can 
be specified. 

MODE= [CJ [O] 

[E] [R] 

The MODE operand specifies the mode of operation for the card reader. 
The following describes the characters that can be specified. 

C — Specifies that the cards to be read are in card image mode. In 

card image mode, the 12 rows of each card column are read into 
two consecutive bytes of main storage. Rows 12 through 3 are 
read into the low-order 6 bits of one byte, and rows 4 through 9 
are read into the low-order 6 bits of the following byte. 

E — Specifies that the cards to be read contain data in EBCDIC code. 



O 



R 



Specifies that the program runs in optical mark read mode (3505 
card reader only). 

Specifies that the program runs in read column eliminate mode 
(3505 card reader and 3525 card punch, read feature). 



Note: If the MODE operand for a 3505 or 3525 is specified in the DCB 
subparameter of a DD statement, either C or E must be specified if R or O 
is specified. 

STACK- {1} 

m 

The STACK operand specifies the stacker bin into which the card is placed 
after reading is completed. If this operand is omitted, stacker number 1 is 
used. The following describes the characters that can be specified. 

1 — Specifies stacker number 1. 

2 — Specifies stacker number 2. 



FUNC= 



U 
IP 
{PW[XT] 

|R 

|RP[D] 
|RW[TJ 
|RWP[XT][D] 
|W[T] 



} 



The FUNC operand defines the type of 3525 card punch data sets that are 
used. If the FUNC operand is omitted from all sources, a data set opened 
for input defaults to read only, and a data set opened for output defaults to 
punch only. The following describes the characters that can be specified in 
the FUNC operand. 

D — Specifies that the data protection option is to be used. The data 
protection option prevents punching information into card 



( 






C 



v> 



102 OS Data Management Macro Instructions 



,.,.^..^,^,^^^0 



o 



o 



DCB— QSAM 

columns that already contain data. When the data protection 
option is used, an 80-byte data protection image (DPI) must have 
been previously stored in SYS1.IMAGELIB. Data protection 
applies only to the output punch portion of a read and punch or 
read, punch, and print operation. 
I — Specifies that the data in the data set is to be punched into cards 
and printed on the cards; the first 64 characters are printed on 
line 1 of the card and the remaining 16 characters are printed on 
line 3. 
p — Specifies that the data set is for punching cards. Seethe 

description of the character X for associated punch and print data 
sets. 
R — Specifies that the data set is for reading cards. 
T — Specifies that the two-line option is used. The two-line print 

option allows two lines of data to be printed on the card (lines 1 
and 3) If T is not specified, the multiline print option is used; 
this allows printing on all 25 possible print lines. In either case, 
the data printed may be the same as the data punched in the 
card, or it may be entirely different data. 
W — Specifies that the data set is for printing. See the description of 
the character X for associated punch and print data sets. 

X — Specifies that an associated data set is opened for output for both 
punching and printing. Coding the character X is used to 
distinguish the 3525 printer output data set from the 3525 punch 
output data set. 
Note- If data protection is specified, the data protection image (DPI) must 
be specified in the FCB subparameter of the DD statement for the data set. 

Source: The DEVD operand can be supplied only in the DCB macr ° 
instruction. However, the optional operands can be supplied in the DCB 
macro instruction, the DCB subparameter of a DD statement, or by the 
problem program before completion of the data control block exit routine. 

DSORG= {PS} 
$PSU} 

The DSORG operand specifies the organization of the data set and if the .data .set 
contains any location-dependent information that would make it unmovable. The 
following can be specified in the DSORG operand: 
PS Specifies a physical sequential data set. 

PSU — Specifies a physical sequential data set that contains 
location-dependent information. 

Source: The DSORG operand must be coded in the DCB macro instruction. 
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V J 
The EODAD operand specifies the address of the routine given control when the 

end of an input data set is reached. Control is given to this routine when a GET 

macro instruction is issued and there are no additional records to be retrieved. If 

the record format is RECFM-FS or FBS the end-of-data condition is sensed 

when file mark is read or if more data is requested after reading a truncated 

block. If the end of the data set has been reached but no EODAD address has 

been supplied to the data control block, or if a GET macro instruction is issued 

after an end-of-data exit is taken, the task is abnormally terminated. For 

additional information on the EODAD routine, see OS Data Management 

Services Guide. 

Source: The EODAD operand can be supplied in the DCB macro instruction or 
by the problem program before the end of the data set has been reached. 

EROPT= {ACC} 
{SKP} 
{ ABE } 

The EROPT operand specifies the action taken by the system when an 
uncorrectable input/output data validity error occurs and no error analysis 
(SYNAD) routine address has been provided, or it specifies the action taken by 
the system after the error analysis routine has returned control to the system with 
a RETURN macro instruction. The specified action is taken for input operations 
or for output operations to a printer. 

Uncorrectable input/output errors resulting from channel operations or 
direct-access operations that make the next record inaccessable cause the task to 
be abnormally terminated regardless of the action specified in the EROPT 
operand. 

ACC — Specifies that the problem program accepts the block causing the error. 
This action can be specified when a data set is opened for INPUT, 
RDBACK, UPDAT, or OUTPUT (OUTPUT applies to printer data 
sets only). 

SKP — Specifies that the block that caused the error is skipped. Specifying 
SKP also causes the buffer associated with the data block to be 
released. This action can be specified when a data set is opened for 
INPUT, RDBACK, or UPDAT. 

ABE — Specifies that the error results in the abnormal termination of the task. 
This action can be specified when the data set is opened for INPUT, 
OUTPUT, RDBACK, or UPDAT. 

If the EROPT operand is omitted, the ABE action is assumed. 

Source: The EROPT operand can be specified in the DCB macro instruction, in 
the DCB subparameter of a DD statement, or by the problem program at any 
time. The problem program can also change the action specified at any time. 

EXLST=reIexp 

The EXLST operand specifies the address of the problem program exit list. The 
EXLST operand is required if the problem program requires additional processing 
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for user labels, user totaling, data control block exit routine, end-of-volume block 

count exits, to define a forms control buffer (FCB) image, or to use the DCB 

ABEND exit for ABEND condition analysis. 

Refer to Appendix D of this publication for the format and requirements of exit 

list processing. For additional information about exit routine processing, refer to 

OS Data Management Services Guide. 

Source: The EXLST operand can be supplied in the DCB macro instruction or by 

the problem program any time before the exit is required by the problem 

program. 

HIARCHY= {0\ 

m 

The HIARCHY operand specifies the main-storage hierarchy in which the buffer 
pool is constructed. The following describes the characters that can be specified: 

— Specifies that the buffer pool is constructed in processor storage. 

1 — Specifies that the buffer pool is constructed in IBM 2361 Core Storage. 

The storage hierarchy can also be specified in a GETPOOL macro instruction. If 

the HIARCHY operand is omitted from all sources, the system constructs the 

buffer pool in processor storage. 

The buffer pool is constructed in the user region or partition within the indicated 

hierarchy; if space is not available indicated hierarchy, the task is abnormally 

terminated. The HIARCHY operand is ignored in systems that do not have 

hierarchy support. The HIARCHY operand must not be specified for MVT 

systems with Model 65 multiprocessing. 

Source- The HIARCHY operand can be supplied in the DCB macro instruction, 

in the DCB subparameter of a DD statement, or in the HIARCHY operand of a 

GETPOOL macro instruction. 

LRECL= { absexp } {X} 

The LRECL operand specifies the length, in bytes, for fixed-length logical 
records, or it specifies the maximum length, in bytes for variable-length or 
undefined-length (output only) logical records. The value specified in the LRECL 
operand cannot exceed the value specified in the BLKSIZE operand except when 
variable-length spanned records are used. 

For fixed-length records that are unblocked, the value specified in the LRECL 
operand must be equal to the value specified in the BLKSIZE operand For 
blocked fixed-length records, the value specified in the LRECL operand must be 
evenly divisible into the value specified in the BLKSIZE operand. 

For variable-length logical records, the value specified in the LRECL operand 
must include the maximum data length (up to 32,752) plus four bytes for the 
record-descriptor word (RDW). 

For undefined-length records, the problem program must insert the actual logical 
record length into the DCBLRECL field before writing the record, or the 
maximum length record will be written. 
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For variable-length spanned records, the logical record length (LRECL) can /"^ 

exceed the value specified in the BLKSIZE operand, and a variable-length \^/ 

spanned record can exceed the maximum blocksize. When the logical record 
length exceeds the maximum blocksize, the logical record length is specified as 
LRECL=X. 

Source: The LRECL operand can be supplied in the DCB macro instruction, in 
the DCB subparameter of a DD statement, by the problem program before 
completion of the data control block exit routine, or by the data set label of an 
existing data set. 

} 
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The MACRF operand specifies the type of macro instructions (GET, PUT or 

PUTX, CNTRL, RELSE, and TRUNC) and the transmittal modes (move, locate, 

data, and substitute) that are used with the data set being created or processed. L 

The operand can be coded in any of the combinations shown above; the following 

describes the characters that can be coded: 

C — Specifies that the CNTRL macro instruction is used with the data set. 
If the CNTRL macro instruction is specified, the data set should be 
for a card reader (stacker selection) or printer (carriage and spacing 
control). The CNTRL option can be specified with GET in the move 
mode only. 

D — Specifies that the data transmittal mode is used (only the data portion 
of a record is moved to or from the work area). Data mode is used 
only with variable-length spanned records. 

G — Specifies that GET macro instructions are used. Specifying G also 

provides the routines that allow the problem program to issue RELSE 
macro instructions. 

L — Specifies that the locate transmittal mode is used; the system provides 
the address of the buffer containing the data. 

M — Specifies that the move transmittal mode is used; the system moves the 
data from the buffer to the work area in the problem program. 

P — Specifies that PUT or PUTX macro instructions are used. Specifying P 
also provides the routines that allow the problem program to issue 
TRUNC macro instructions. 
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X _ Specifies that the substitute transmittal mode is used; the system 

substitutes a buffer for a work area contained in the problem program. 

Note: For data sets on paper tape that are processed by QSAM, only 
MACRF=(GM) can be specified. 

Source: The MACRF operand can be supplied only in the DCB macro 
instruction. 

OPTCD= {B } [T] 

{C } 
*H } 
{Q \ 
{V \ 
{UC } 
{W \ 
WC] 
& } 

{ZC } 
The OPTCD operand specifies the optional services used with the QSAM data 
set. Two of the optional services (OPTCD-B and OPTCD=H) cannot be 
specified in the DCB macro instruction. They are requested in the DCB 
subparameter of a DD statement. Since all optional services codes must be 
supplied by the same source, the OPTCD operand must be omitted from the DCB 
macro instruction if either of these options is requested in a DD statement. The 
following describes the characters that can be specified. 

C — Requests that chained scheduling be used. OPTCD=C cannot be 
specified when either BFTEK=A or BFTEK=R is specified for the 
same data control block. Also, chained scheduling cannot be specified 
for associated data sets or printing on a 3525. 

Q — Request that ASCII tape records in an input data set be converted to 
EBCDIC code when the input record has been read, or an output 
record in EBCDIC code be converted to ASCII code before the record 
is written. 

T — Requests the user totaling facility. If this facility is requested, the 

EXLST operand should specify the address of an exit list to be used. 

U Specified only for a printer with the universal-character-set feature. 

This option unblocks data checks (permits them to be recognized as 
errors) and allows analysis by the appropriate error analysis routine 
(SYNAD routine). If the U option is omitted, data checks are not 
recognized as errors. 

W — Specifies that the system performs a validity check for each record 

written on the direct-access device being used. If the device is a 2321 
data cell, the system performs a validity check whether it is requested 
or not. 

Z — For magnetic tape, input only, the Z option requests the system to 

shorten its normal error recovery procedure to consider a data check as 
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a permanent I/O error after five unsuccessful attempts to read a 
record. This option is available only if it is selected when the 
operating system is generated. OPTCD=Z is used when a tape is 
known to contain errors and there is no need to process every record. 
The error analysis routine (SYNAD) should keep a count of permanent 
errors and terminate processing if the number becomes excessive. 

For direct-access devices only, the Z option requests the system to use 
the search direct option to accelerate the input operations for a data 
set. OPTCD=Z cannot be specified when RECFM=UT, FS, FBT, VS, 
or VBS. 

Source: The following describes the optional services that can be specified in the 
DCB subparameter of a DD statement. If either of these options is requested, the 
complete OPTCD operand must be supplied in the DD statement. 

B — If OPTCD=B is specified in the DCB subparameter of a DD 

statement, it forces the end-of-volume (EOV) routine to disregard the 
end-of-file recognition for magnetic tape. When this occurs, the EOV 
routine uses the number of volume serial numbers to determine end of 
file. For an input SL or AL tape, the EOV routine will treat EOF 
labels as EOV labels until the volume serial list is exhausted. When no 
more volumes are available, control is passed to the user's end-of-data 
routine. This option allows SL or AL tapes to be read out of order or 
to be concatenated to another tape using one DD statement. 

H — If OPTCD =H is specified in the DCB subparameter of a DD 

statement, it specifies that the DOS/OS interchange feature is being 
used with the data set. 
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The RECFM operand specifies the record format and characteristics of the data 
set being created or processed. All record formats can be used in QSAM. When 
RECFM is not specified, undefined format is assumed. The following describes 
the characters that can be specified. 

A — Specifies that the records in the data set contain American National 
Standards Institute (ANSI) control characters. Refer to Appendix E 
for a description of control characters. 
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B _ Specifies that the data set contains blocked records. 
D — Specifies that the data set contains variable-length ASCII tape records. 
See OPTCD=Q and the BUFOFF operand for a description of how 
to specify ASCII data sets. 
F — Specifies that the data set contains fixed-length records. 
M — Specifies that the records in the data set contain machine code control 
characters. Refer to Appendix E for a description of control 
characters. RECFM=M cannot be used with ASCII data sets. 
s _ For fixed-length records, S specifies that the records are written as 

standard blocks; the data set does not contain any truncated blocks or 
unfilled tracks, with the exception of the last block or track in the data 
set. 

For variable-length records, S specifies that a record can span more 
than one block. If spanned records are used, exchange buffering 
(BFTEK=E) cannot be specified. 
T _ Specifies that the track-overflow feature is used with the data set. The 
track-overflow feature allows a record to be written partially on one 
track and the remainder of the record on the following track (if 
required). Chained scheduling (OPTCD=C) and exchange buffering 
(BFTEK=E) cannot be used if the track-overflow feature is used. 
U — Specifies that the data set contains undefined-length records. 
V — Specifies that the data set contains variable-length records. 

Note: RECFM=V cannot be specified for a card reader data set or an 
ASCII tape data set. 
Source- The RECFM operand can be supplied in the DCB macro instruction, in 
the DCB subparameter of a DD statement, by the problem program before 
completion of the data control block exit routine, or by the data set label ot an 
existing data set. 

SYNAD=re/exp 

The SYNAD operand specifies the address of the error analysis routine given 
control when an uncorrectable input/output error occurs. The contents of the 
registers when the error analysis routine is given control are described in 
Appendix A of this publication. 

The error analysis routine must not use the save area pointed to by register 13, 
because this area is used by the system. The system does not restore registers 
when it regains control from the error analysis routine. The error analysis routine 
can issue a RETURN macro instruction that uses the address in register 14 to 
return control to the system. 

If the error condition was the result of a data-validity error, the control program 
takes the action specified in the EROPT operand; otherwise, the task is 
abnormally terminated. The control program takes these actions when the 
SYNAD operand is omitted or when the error analysis routine returns control. 
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Source: The SYNAD operand can be supplied in the DCB macro instruction or /~^ 

by the problem program. The problem program can also change the error routine 
address at any time. 
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DCBD 

DCBD — Provide Symbolic Reference to Data Control Blocks (BDAM, BISAM, 
BPAM, BSAM, QISAM, and QSAM) 

The DCBD macro instruction is used to generate a dummy control section that 
provides symbolic names for the fields in one or more data control blocks. The names 
and attributes of the fields appear as part of the description of each data control block 
in OS System Control Blocks publication. Attributes of the symbolically named fields 
in the dummy section are the same as the fields in the data control blocks, with the 
exception of fields containing 3-byte addresses. The symbolically named fields 
containing 3-byte addresses have length attributes of four and are aligned on fullword 
boundaries. 

The name of the dummy control section generated by a DCBD macro instruction is 
IHADCB. The use of any of the symbolic names provided by the dummy section must 
be preceded by a USING instruction specifying IHADCB and a dummy section base 
register (which contains the address of the actual data control block). The DCBD 
macro instruction can only be issued once within any assembled module; however, the 
resulting symbolic names can be used for any number of data control blocks by 
changing the address in the dummy section base register. The DCBD macro instruction 
can be coded at any point in a control section; if coded at any point other than at the 
end of a control section; however, the control section must be resumed by coding a 
CSECT instruction. 

The DCBD macro instruction is written as follows: 



blank 


DCBD 




DSORCHLPS] [/DA] [,IS] [,LR] Oo] [,PS] [QS1|)J 
", DEVD=([DA] [, PC] [, PR] [, PT] [, RD] [, TA] [, MR])] 



DSORG= ([GS) ) 

([BSM,DA][,IS][,LR][,PO][,PS][,QS] ) 

The DSORG operand specifies the types of data control blocks for which 
symbolic names are provided. If the DSORG operand is omitted, the DEVD 
operand is ignored, and symbolic names are provided only for the "foundation 
block" portion that is common to all data control blocks. One or more of the 
following pairs of characters can be specified; each pair of characters must be 
separated by a comma: 

BS — Specifies a data control block for a sequential data set and basic access 
method. 

DA — Specifies a data control block for a direct data set. 

IS — Specifies a data control block for an indexed sequential data set. 

LR — Specifies a dummy section for the logical record length field 
(DCBLRECL) only. 

PO — Specifies a data control block for a partitioned data set. 
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PS — Specifies a data control block for a sequential data set. PS includes 

both BS and QS. V*/ 

QS — Specifies a data control block for a sequential data set and queued 
access method. 

GS — Specifies a data control block for graphics; this operand cannot be 
used in combination with any of the above. 

DEVD=[DA][,PC][,PR][,PT][,RD][,TA][,MR] 

The DEVD operand specifies the types of devices on which the data set can 
reside. If the DEVD operand is omitted and a sequential data set is specified in 
the DSORG operand, symbolic names are provided for all of the device types 
listed below. One or more of the following pairs of characters can be specified; 
each pair of characters must be separated by a comma: 

DA — Direct-access device 

PC — Online punch *• 

PR — Online printer 

PT — Paper tape 

RD — Online card reader or read punch feed 

TA — Magnetic tape 

MR — Magnetic character reader 



vy 
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ESETL 



ESETL— End Sequential Retrieval (QISAM) 



The ESETL macro instruction ends the sequential retrieval of data from an indexed 
sequential data set and causes the buffers associated with the specified data control 
block to be released. An ESETL macro instruction must separate SETL macro 
instructions issued for the same data control block. 

The ESETL macro instruction is written as follows: 



[symbol] 



ESETL 



deb address 



deb address— RX-Type Address, (2-12), or (1) 

The deb address operand specifies the address of the data control block opened 
for the indexed sequential data set being processed. 
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FEOV 



FEOV— Force End of Volume (BSAM and QSAM) 
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The FEOV macro instruction causes the system to assume an end-of-volume condition, 
and causes automatic volume switching. Volume positioning for magnetic tape can be 
specified by the option operand. If no option is coded, the positioning specified in the 
OPEN macro instruction is used. Output labels are created as required and new input 
labels are verified. The standard exit routines are given control as specified in the data 
control block exit list. For BSAM, all input and output operations must be tested for 
completion before the FEOV macro instruction is issued. The end-of -data-set 
(EODAD) routine is given control if an input FEOV macro instruction is issued for the 
last volume of an input data set. 
The FEOV macro instruction is written as follows: 



[symbol] 



FEOV 



deb address 



[, REWIND"! 
L, LEAVE J 



deb address — RX-Type Address, (2-12), or (1) 

The deb address operand specifies the address of the data control block for an 

opened sequential data set. 
The following operands request optional services. 

REWIND — Requests that the system position the tape at the load point regardless 
of the direction of processing. 

LEAVE — Requests that the system position the tape at the logical end of the 

data set on that volume; this option causes the tape to be positioned at 
a point after the tapemark that follows the trailer labels. Note that 
multiple tape units must be available to achieve this positioning. If 
only one tape unit is available, its volume is rewound and unloaded. 

Note- If an FEOV macro is issued for a spanned multivolume data set that is being 
read using QSAM, errors may occur when the next GET macro is issued following an 
FEOV macro if the first segment on the new volume is not the first segment of a 
record. The errors include duplicate records, program checks in the user program, and 
invalid input from the variable spanned data set. 



o 
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FIND 

FIND — Establish the Beginning of a Data Set Member (BPAM) 

The FIND macro instruction causes the system to use the address of the first block of a 
specified partitioned data set member as the starting point for the next READ macro 
instruction for the same set. All previous input and output operations that specified the 
same data control block must have been tested for completion before the FIND macro 
instruction is issued. 

The FIND macro instruction is written as follows: 



[symbol] 


FIND 


deb address, (name address, D ) 
i relative address lisr,C; 
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deb address — RX-Type Address, (2-12), or (1) 

The deb address operand specifies the address of the data control block for the 
opened partitioned data set being processed. 

name address — RX-Type Address, (2-12), or (0) 

The name address operand specifies the main-storage address of a doubleword 
that contains the data set member name. The name must start in the first byte of 
the doubleword and be padded on the right (if necessary) to complete the 
eight-byte doubleword. 

D — Specifies that only a member name has been supplied, and the access 
method must search the directory of the data set indicated in the data 
control block to find the location of the member. 

relative address list — RX-Type Address, (2-12), or (0) 

The relative address list operand specifies the main-storage address that contains 
the relative address (TTRK) for the beginning of a data set member. The relative 
address can be a list entry completed by using a BLDL macro instruction for the 
data set being processed, or the relative address can be supplied by the problem 
program. 

C — Specifies that a relative address has been supplied, and no directory search is 
required. The relative address supplied is used directly by the access method 
for the next input operation. 
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Completion Codes (f 

When the system returns control to the problem program, the low-order byte of register 
15 contains one of the following return codes; the three high-order bytes of register 15 
are set to zero. 

name address, D relative address list, C 

00 - Successful execution 00 - At all times. If the relative 

address is in error, execution 
04 - Name not found of the next READ macro 

instruction causes control to 
08 - Permanent input/output be passed to the error 

error found during analysis (SYNAD) routine, 

directory search 
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FREEBUF 

FREEBUF— Return a Buffer to a Pool (BDAM, BISAM, BPAM, and BSAM) 

The FREEBUF macro instruction causes the system to return a buffer to the buffer 
pool assigned to the specified data control block. The buffer must have been acquired 
using a GETBUF macro instruction. 
The FREEBUF macro instruction is written as follows: 



o 



o 



[symboll 



FREEBUF 



deb address, register 



deb address— RX-Type Address, (2-12), or (1) 

The deb address operand specifies the address of the data control block for an 
opened data set to which the buffer pool has been assigned. 

register — (2-12) 

The register operand specifies one of registers 2 through 12 that contains the 
address of the buffer being returned to the buffer pool. 
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FREEDBUF 

FREEDBUF— Return a Dynamically Obtained Buffer (BDAM and BISAM) 

The FREEDBUF macro instruction causes the system to return a buffer to the buffer 
pool assigned to the specified data control block. The buffer must have been acquired 
through dynamic buffering; that is, by coding 4 S' for the area address operand in the 
associated READ macro instruction. 

Note: A buffer acquired dynamically can also be released by a WRITE macro 
instruction; refer to the description of the WRITE macro instruction for BDAM or 
BISAM. 

The FREEDBUF macro instruction is written as follows: 



© 



[symbol] 


FREEDBUF 


decb address, J K I ,dcb address 



decb address — RX-Type Address, (2-12), or (0) 

The decb address operand specifies the address of the data event control block 
(DECB) used or created by the READ macro instruction that acquired the buffer 
dynamically. 

K — Specifies that BISAM is being used. 

D — Specifies that BDAM is being used. 

deb address — RX-Type Address, (2-12), or (1) 

The deb address operand specifies the address of the data control block for the 
opened data set being processed. 
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FREEPOOL 

FREEPOOL— Release a Buffer Pool (BDAM, BISAM, BPAM, BSAM, 
QISAM, and QSAM) 

The FREEPOOL macro instruction causes an area of main storage, previously assigned 
as a buffer pool for a specified data control block, to be released. The main-storage 
area must have been acquired either automatically or by the execution of a GETPOOL 
macro instruction. For queued access methods, the FREEPOOL macro instruction 
must not be issued until after a CLOSE macro instruction has been issued for all the 
data control blocks using the buffer pool. For basic access methods, the FREEPOOL 
macro instruction can be issued as soon as the buffers are no longer required. A buffer 
pool should be released only once, regardless of the number of data control blocks 
sharing the buffer pool. 

If BFALN=F is supplied from a source other than the DCB macro instruction, the 
CLOSE macro instructions removes the bit that designates fullword alignment from the 
data control block. In this case, if a FREEPOOL macro instruction is issued after the 
CLOSE macro instruction, the system does not release the complete buffer area (eight 
bytes are not released). 

The FREEPOOL macro instruction is written as follows: 



© 



[symbolj 


FREEPOOL 


deb address 



deb address — RX-Type Address, (2-12), or (1) 

The deb address operand specifies the address of a data control block to which 
the buffer pool has been assigned. 
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GET— QISAM 

GET— Obtain Next Logical Record (QISAM) 

The GET macro instruction causes the system to retrieve the next record. Control is 
not returned to the problem program until the record is available. 

The GET macro instruction is written as follows: 



symbol 


GET 


deb address Larea address 



%p/ 
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deb address — RX-Type Address, (2-12), or (1) 

The deb address operand specifies the address of the data control block for the 
opened input data set being retrieved. 

area address — RX-Type Address, (2-12), or (0) 

The area address operand specifies the main-storage address into which the 
system is to move the record (move mode only). Either the move or locate mode 
can be used with QISAM, but they must not be mixed within the specified data 
control block. The following describes operations for move and locate modes: 

Locate Mode: If the locate mode has been specified in the data control block, 
the area address operand must be omitted. The system returns the address of 
the buffer segment containing the record in register 1. 

Move Mode: If the move mode has been specified in the data control block, the 
area address operand must specify the main-storage address in the problem 
program into which the system will move the record. If the area address operand 
is omitted, the system assumes that register contains the area address. When 
control is returned to the problem program, register contains the area address, 
and register 1 contains the address of the data control block. 

Notes: 

1. The end-of-data-set (EODAD) routine is given control if the end of the data set 
is reached; the data set must be closed or an ESETL macro instruction must be 
issued. An attempt to continue to use the data set will have unpredictable results. 

2. The error analysis (SYNAD) routine is given control if the input operation could 
not be completed successfully. The contents of the general registers when control 
is given to the SYNAD routine are described in Appendix A. 

3. When the key of an unblocked fixed-length record is retrieved with the data, the 
address of the key is returned as follows (see the SETL macro instruction): 

Locate mode — The address of the key is returned in register 0. 

Move mode — The key appears in front of the record in the main-storage area. 

4. If a GET macro instruction is issued for a data set and the previous request issued 
for the same data set was an OPEN, ESETL, or unsuccessful SETL (no record 
found), a SETL B (key and data) is invoked automatically, and the first record in 
the data set is returned. 
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GET— QSAM 



GET— Obtain Next Logical Record (QSAM) 
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The GET macro instruction causes the system to retrieve the next record. Various 
modes are available and are specified in the DCB macro instruction. In the locate 
mode, the GET macro instruction locates the next sequential record or record segment 
to be processed. The system returns the address of the record in register 1 and places 
the length of the record or segment in the logical-record-length (DCBLRECL) field of 
the data control block. The user can process the record within the input buffer or 
move the record to a work area. 

In the move mode, the GET macro instruction moves the next sequential record to the 
user's work area. This work area must be big enough to contain the largest logical 
record of the data set and its record-descriptor word (variable-length records). The 
system returns the address of the work area in register 1. (This feature provides 
compatibility with the substitute mode GET.) The record length is placed in the 
DCBLRECL field. The move mode can be used only with simple buffering. 

In the data mode, which is available only for variable-length spanned records, the GET 
macro instruction moves only the data portion of the next sequential record to the 
user's work area. 

In the substitute mode, the GET macro instruction transfers ownership of the next 
sequential record in a data set from the system to the user. In return, the ownership of 
a work area is transferred from the user to the system for future use as an input buffer. 
There is no movement of data. The address of an input buffer containing the record is 
returned to the user in register 1 after the instruction is executed. The system returns 
the record length in the DCBLRECL field. For undefined-length records, the 
DCBLRECL field is equal to the BLKSIZE field for chained scheduling. The 
substitute mode can be used only with exchange buffering and cannot be used with 
variable-length records. 

If the ASCII translation routines are included when the operating system is generated, 
translation can be requested by coding LABEL=(,AL) or (,AUL) in the DD statement, 
or it can be requested by coding OPTCD=Q in the DCB macro instruction or DCB 
subparameter of the DD statement. When translation is requested, all QSAM records 
whose record format (RECFM operand) is F, FB, D, DB, or U are automatically 
translated from ASCII code to EBCDIC code as soon as the input buffer is full. For 
translation to occur correctly, all input data must be in ASCII code. 

The GET macro instruction is written as follows: 



[symbol] 


GET 


deb address [,area address] 



deb address — RX-Type Address, (2-12), or (1) 

The deb address operand specifies the address of the data control block for the 
opened input data set being retrieved. 
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area address — RX-Type Address, (2-12), or (0) f( A. 

The area address operand specifies the main-storage address of an area into s -^ 

which the system is to move the record (move or data mode), or it specifies the 

main-storage address of an area to be exchanged for the buffer containing the 

record (substitute mode). The move, locate, data, or substitute mode can be used 

with QSAM, but they must not be mixed within the specified data control block. 

If the area address operand is omitted in the move, data, or substitute mode, the 

system assumes that register contains the area address. The following describes 

the operation of the four modes: 

Locate mode: If the locate mode has been specified in the data control block, 
the area address operand must be omitted. The system returns the address of 
the buffer segment containing the record in register 1 . 

When retrieving variable-length spanned records, the records are obtained one 
segment at a time. The problem program must retrieve additional segments by 
issuing subsequent GET macro instructions, except when a logical record interface 
is requested (by specifying BFTEK=A in the DCB macro instruction or by 
issuing a BUILDRCD macro instruction.) In this case, the control program 
retrieves all record segments and assembles the segments into a complete logical 
record. The system returns the address of this record area in register 1 . To 
process a record when the logical record length is greater than 32,756 bytes, 
LRECL—X must be specified in the data control block, and the problem program 
must assemble the segments into a complete logical record. 



Move mode: If the move mode has been specified in the data control block, the 
area address operand specifies the main-storage address of an area in the 



r 



problem program into which the system will move the record. % y 

For variable-length spanned records, the system constructs the record-descriptor 
word in the first four bytes of the main-storage area and assembles one or more 
segments into the data portion of the logical record; the segment descriptor words 
are removed. 

Data mode: If the data mode has been specified in the data control block (data 
mode can be specified for variable-length spanned records only), the area address 
operand specifies the address of the main storage area in the problem program 
into which the system will move the data portion of the logical record; a 
record-descriptor word is not constructed when data mode is used. 

Substitute mode: If the substitute mode is specified in the data control block, the 

area address operand specifies the main-storage address of an area in the * 

problem program that will be exchanged for the buffer containing the record. 

The system returns the address of the buffer containing the record in register 1 . 

GET Routine Exits 

The end-of-data-set (EODAD) routine is given control if the end of the data set is 
reached; the data set must be closed. Issuing a GET macro instruction in the EODAD 
routine results in abnormal termination of the job step. 

The error analysis (SYNAD) routine is given control if the input operation could not be 
completed successfully. The contents of the general registers when control is given to 
the SYNAD routine are described in Appendix A. 
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GETBUF 

GETBUF— Obtain a Buffer (BDAM, BISAM, BPAM, and BSAM) 

The GETBUF macro instruction causes the control program to obtain a buffer from the 
buffer pool assigned to the specified data control block and to return the address of the 
buffer in a designated register. The BUFCB field of the data control bloc k must 
contain the address of the buffer pool control block when the GETBUF macro 
instruction is issued. The system returns control to the instruction following the 
GETBUF macro instruction. The buffer obtained must be returned to the buffer pool 
using a FREEBUF macro instruction. 

The GETBUF macro instruction is written as follows: 



[symbolj 



GETBUF 



deb address, register 






deb address— RX-Typt Address, (2-12), or (1) 

The deb address operand specifies the address of the data control block that 
contains the buffer pool control block address. 

register — (2-12) 

The register operand specifies one of the registers 2 through 12 in which the 
system is to place the address of the buffer obtained from the buffer pool. If no 
buffer is available, the contents of the designated register are set to zero. 
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GETPOOL 

GETPOOI^-Build a Buffer Pool (BDAM, BISAM, BPAM, BSAM, QISAM, 
and QSAM) 

The GETPOOL macro instruction causes a buffer pool to be constructed in a 
main-storage area provided by the system. The system places the address of the buffer 
pool control block in the BUFCB field of the data control block. The GETPOOL 
macro instruction must be issued either before an OPEN macro instruction is issued or 
during the data control block exit routine for the specified data control block. 

The GETPOOL macro instruction is written as follows; 



f symbol] 


GETPOOL 


deb address, number of buffers, buffer length 
1 (0) 


[,HIARCHY={°|- 



deb address— RX-Type Address, (2-12), or (1) 

The deb address operand specifies the address of the data control block to which 
the buffer pool is assigned. Only one buffer pool can be assigned to a data 
control block. 

number of buffers — symbol, decimal digit, absexp, or (2-12) 

The number-of -buffers operand specifies the number of buffers in the buffer pool 
up to a maximum of 255. 

buffer length — symbol, decimal digit, absexp, or (2-12) 

The buffer length operand specifies the length, in bytes, or each buffer in the 
buffer pool. The value specified for the buffer length must be a doubleword 
multiple; otherwise the system rounds the value specified to the next higher 
doubleword multiple. The maximum length that can be specified is 32,760 bytes. 
For QSAM, the buffer length must be at least as large as the value specified in 
the blocksize (DCBBLKSI) field in the data control block. 

(0) — Coded as shown 

The number of buffers and buffer length can be specified in general register 0. If 
(0) is coded, register must contain the binary values for the number of buffers 
and buffer length as shown in the following illustration: 



Bits: 



Register 












Number of Buffers 


Buffer Length 







15 


16 




31 
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HIARCHY= {0} 

m 

The HIARCHY operand specifies the main-storage hierarchy in which the buffer 
pool is constructed. If the HIARCHY parameter is omitted, the buffer pool is 
formed in the main-storage hierarchy indicated in the data control block. If no 
HIARCHY parameter is specified in the data control block, hierarchy is 
assigned. The HIARCHY operand is ignored in an operation system that does not 
have main-storage hierarchy support. The following characters can be specified in 
the HIARCHY operand. 

— Specifies that the buffer pool is constructed in processor storage. 

1 — Specifies that the buffer pool is constructed in IBM 2361 Core 

Storage. 

The following illustration shows the format of the buffer pool. The buffer pool and the 
associated main-storage area are released by issuing a FREEPOOL macro instruction 
after issuing a CLOSE macro instruction for the data set indicated in the specified data 
control block. 
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Area — 

Address 



Buffer Pool 

Control 

Block 



8 bytes - 



Buffer 



Buffer 

Length 
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Buffer 



Buffer 
Length 



Area Length 
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Area Length=(Buffer Length) x (Number of Buffers) ■+ 8 
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NOTE 

NOTE— Provide Relative Position (BPAM and BSAM— Tape and Direct 
Access Only) 

The NOTE macro instruction causes the system to return the relative position of the 
last block read from or written into a data set. All input and output operations using 
the same data control block must be tested for completion before the NOTE macro 
instruction is issued. 

The capability of using the NOTE macro instruction is automatically provided when a 
partitioned data set is used (DSORG=PO or POU), but when a sequential data set 
(BSAM) is used, the use of NOTE/POINT macro instructions must be indicated in the 
MACRF operand of the DCB macro instruction. The relative position, in terms of the 
current volume, is returned in register 1 as follows: 

Magnetic Tape: The block number is in binary, right-adjusted in register 1 with 
high-order bits set to zero. Do not use a NOTE macro instruction for tapes without 
standard labels when: 
. The data set is opened for RDBACK (specified in the OPEN macro instruction). 

The DISP parameter of the DD statement for the data set specifies DISP=MOD. 
Direct-Access Device: TTRz format, where: 

TT is a 2-byte relative track number. 

R is a 1-byte block (record) number on the track indicated by TT. 

z is a byte set to zero. 
Note: When a direct-access device is being used, the amount of remaining space on the 
track is returned in register if a NOTE macro instruction follows a WRITE macro 
instruction; if a NOTE macro instruction follows a READ macro instruction, the track 
capacity of the direct-access device is returned in register 0. 

The NOTE macro instruction is written as follows: 



[symbol! 



NOTE 



deb address 



%J 



deb address— RX-Type Address, (2-12), or (1) 

The deb address operand specifies the address of the data control block opened 
for the partitioned or sequential data set being processed. 
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OPEN 

OPEN— Logically Connect a Data Set (BDAM, BISAM, BPAM, BSAM, 
QISAM, and QSAM) 

The OPEN macro instruction causes the specified data control block(s) to be 
completed and the data set(s) identified in the data control block(s) to be prepared for 
processing. Input labels are analyzed and output labels are created. Control is given to 
exit routines as specified in the data control block exit list. The processing method 
(option 1 ) is designated to provide correct volume positioning for the data set and 
define the processing mode (INPUT, OUTPUT, etc.) for the data set(s). Final volume 
positioning (when volume switching occurs) can be specified (option 2) to override the 
positioning implied by the DD statement DISP parameter. Option 2 applies only to 
volumes in a multivolume data set other than the last volume. Any number of data 
control block addresses and associated options may be specified in the OPEN macro 
instruction. 

If associated data sets for a 3525 card punch are being opened, all associated data sets 
must be open before an I/O operation is initiated for any of the data sets. For a 
description of associated data sets, refer to OS Data Management Services Guide. 

The standard form of the OPEN macro instruction is written as follows (the list and 
execute forms are shown following the description of the standard form): 



o 



[symbo Ij 


OPEN 


(deb address, [(options) ]/•••) 



deb address — A-Type Address or (2-12) 

The deb address operand(s) specifies the address of the data control block(s) for 
the data set(s) to be prepared for processing. 



options 



The options operands shown in the following illustration indicate the volume 
positioning available based on the device type and access method being used. If 
option 1 is omitted, INPUT is assumed. If option 2 is omitted, DISP is assumed. 
Option 1 must be coded if option 2 is coded. Options 1 and 2 are ignored for 
BISAM and QISAM (in the scan mode), and the data control block indicates the 
operation. OUTPUT or OUTIN must be specified when creating a data set. 
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DEVICE TYPE 






ACCESS 














METHOD 


Magnetic tape 

Option 1 


Option 2 




Direct access 
Option 1 


Option 2 


Other Types 

Option 1 


QSAM 


[INPUT ] 
[OUTPUT ] 
[RDBACK] 


[.REREAD ] 
[,LEAVE ] 
[,DISP ] 


[INPUT ] 
[OUTPUT ] 
[UPDAT ] 


[.REREAD ] 
[.LEAVE ] 
[,DISP ] 


[INPUT ] 
[OUTPUT ] 


BSAM 


[INPUT ] 
[OUTPUT ] 
[INOUT ] 
[OUTIN ] 
[RDBACK] 


[.REREAD ] 
[.LEAVE ] 
[,DISP ] 


[INPUT ] 
[OUTPUT ] 
[INOUT ] 
[OUTIN ] 
[UPDAT ] 


[.REREAD ] 
[.LEAVE ] 
[,DISP ] 


[INPUT ] 
[OUTPUT ] 


QISAM 
(Load Mode) 


— 


— 




[OUTPUT ] 


— 


— 


BPAM, 
BDAM 


— 


— 




[INPUT ] 
[OUTPUT ] 
[UPDAT ] 


~~~ 


—"" 



( 






Option 2 



The following describes the options shown in the preceding illustration. All option 
operands are coded as shown. 

Option 1 Meaning 

INPUT Input data set. 

INOUT The data set is first used for input and, without reopening, it is used as 

an output data set. The data set is processed as INPUT if 
LABEL=(,„IN) is specified in the DD statement. 

OUTPUT Output data set (for BDAM, OUTPUT is equivalent to UPDAT). 

OUTIN The data set is first used for output and, without reopening, it is used 

as an input data set. The data set is processed as OUTPUT if 
LABEL=(,„OUT) is specified in the DD statement. 

RDBACK Input data set, positioned to rea d backward 

UPDAT Data set to be updated in place. 

Option 2 Meaning 

LEAVE Positions the current volume to the logical end of the data set. 

REREAD Positions the current volume to reprocess the data set when volume 

switching occurs. 

DISP Performs volume positioning implied by the DISP parameter of the DD 

control statement, as follows: 

DISP Parameter 

PASS 



v.. 



DELETE 

KEEP, CATLG, or 
UNCATLG 



Action 

Forward space to the and of the data set on the 
current volume 

Rewind the current volume 

Rewind and unload the current volume 



V> 
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OPEN 

Note: When the DELETE option is specified, the system waits for the completion of 
the rewind operation before it continues processing subsequent reels of tape. 

After the OPEN macro instruction has been executed, bit 3 of th e D CBOFI ,GS f ield in 
the data control block is set to 1 if the data control block has been opened successfully, 
but is set to if the data control block has not been opened successfully. 

The following errors cause the results indicated: 
£ rror Result 

Opening a data control block that No action, 

is already open. 

Attempting to open a data control Unpredictable, 

block when the deb address 
operand does not specify the 
address of a data control block. 

Opening a data control block when A «DD STATEMENT MISSING" message 

a corresponding DD statement has is issued. An attempt to use the 

not been provided. data set causes unpredictable results. 

The last of these errors can be detected by testing bit 3 of the DCBOFLGS field in the 
data control block. Bit 3 is set to in the case of an error and can be tested by the 
sequence: 

TMDCBOFLGS,X 4 10' 

BZ ERRORRTN (Branch to user's error routine) 

Executing the two instructions shown above requires writing a PCBD macro instruction 
in the program, and a base register must be defined with a USING statement before 
the instructions are executed. 
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OPEN— List Form 



OPEN— List Form 



The list form of the OPEN macro instruction is used to construct a data management 
parameter list. Any number of operands (data control block addresses and associated 
options) can be specified. 

The list consists of a one-word entry for each DCB in the parameter list; the high-order 
byte is used for the options and the three low-order bytes are used for the DCB 
address. The end of the list is indicated by a one in the high-order bit of the last 
entry's option byte. The length of a list generated by a list form instruction must be 
equal to the maximum length list required by any execute form instruction that refers to 
the same list. A maximum length list can be constructed by one of two methods: 

• Code a list-form instruction with the maximum number of parameters that are 
required by an execute form instruction that refers to the list. 

• Code a maximum length list by using commas in a list-form instruction to acquire 
a list of the appropriate size, for example, coding OPEN (,„„,„, ),MF=L would 
provide a list of five fullwords (five deb addresses and five options). 

Entries at the end of the list that are not referenced by the execute-form instruction are 
assumed to have been filled in when the list was constructed or by a previous 
execute-form instruction. Before using the execute-form instruction, you may shorten 
the list by placing a one in the high-order bit of the last DCB entry to be processed. 

A zeroed work area on a fullword boundary is equivalent to OPEN 
(,(INPUT,DISP),...),MF=L and can be used in place of a list-form instruction. The 
high-order bit of the last DCB entry must contain a one before this list can be used 
with the execute-form instruction. 

A parameter list constructed by an OPEN, list form, macro instruction can be referred 
to by either an OPEN or CLOSE execute form instruction. 

The description of the standard form of the OPEN macro instruction provides the 
explanation of the function of each operand. The description of the standard form also 
indicates which operands are completely optional and those required in at least one of 
the pair of list and execute forms. The format description below indicates the optional 
and required operands in the list form only. 

The list form of the OPEN macro instruction is written as follows: 



[symbol] 


OPEN 


( [deb address] , [(options) j , . . .),MF=L 



deb address — A-Type Address 

MF=L — Coded as shown 

The MF—L operand specifies that the OPEN macro instruction is used to create a 
data management parameter list that is referenced by an execute form instruction. 
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OPEN — Execute Form 



OPEN — Execute Form 



O 



A remote data management parameter list is used in, and can be modified by, the 

execute form of the OPEN macro instruction. The parameter list can be generated by 

the list form of either an OPEN or CLOSE macro instruction. 

The description of the standard form of the OPEN macro instruction provides the 

explanation of the function of each operand. The description of the standard form also 

indicates which operands are totally optional and those required in at least one of he 

pair of list and execute forms. The format description below indicates the optional and 

required operands in the execute form only. 

The execute form of the OPEN macro instruction is written as follows: 



[symbol] 



OPEN 



[([deb address] , [(options)] , . . .)] 

,MF=(E, \ data management list address J ) 
ill 



deb address— RX-Type Address or (2-12) 
MF=(E, { data management list address } 

«» » 

This operand specifies that the execute form of the OPEN macro instruction is 
used, and an existing data management parameter list (created by a list-form 
instruction) is used. The MF= operand is coded as follows: 

E — Coded as shown 

data management list address —RX-Type, (2-12), (1) 



o 
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POINT 

POINT— Position to a Relative Block (BPAM and BSAM— Tape and Direct 
Access Only) 

The POINT macro instruction causes the system to start processing the next READ or 
WRITE operation at the specified block in the data set on the current volume. All 
input and output operations using the same data control block must have been tested 
for completion before the POINT macro instruction is issued. When processing a data 
set that has been opened for UPDAT, the POINT macro instruction must be followed 
by a READ macro instruction. When processing an output data set, the POINT macro 
instruction must be followed by a WRITE macro instruction prior to closing the data 
set, unless a CLOSE macro instruction (with TYPE=T specified) was issued prior to 
the POINT macro instruction. Issuing a POINT macro instruction for the system input 
data set or a system output data set on magnetic tape results in an effective NOP 
instruction. 

The POINT macro instruction is written as follows: 



C 



o 



[symbol] 


POINT 


deb address, block address 



deb address— RX-Type Address, (2-12), or (1) 

The deb address operand specifies the address of the data control block for the 
opened data set that is to be positioned. 

block address— -RX-Type Address, (2-12), or (0) 

The block address operand specifies the address of a fullword on a fullword 
boundary containing the relative address of the block in the data set that is to be 
processed next. The relative address is specified as follows: 

Magnetic Tape: The block number is in binary and is right-adjusted in the 
fullword with the high-order bits set to zero; add one if reading tape backward. 
Do not use the POINT macro instruction for tapes without standard labels when: 

The data set is opened for RDBACK. 

The DD statement for the data set specifies DISP=MOD. 

If OPTCD=H is indicated in the data control block, the POINT macro instruction 
can be used to perform record positioning on DOS tapes that contain embedded 
checkpoint records. Any embedded checkpoint records that are encountered 
during the record positioning are bypassed and are not counted as blocks spaced 
over. OPTCD=H must be specified in a job control language DD statement. Do 
not use the POINT macro instruction to backspace DOS 7-track tapes that are 
written in data convert mode and that contain embedded checkpoint records. 

Direct-Access Device: The fullword specified in the block address operand 
contains the relative track address (in the form TTRz), where: 

TT is a 2-byte relative track number. 

R is a 1-byte block (record) number on the track indicated by TT. 

z is a byte set to zero; it may also be set to 1 to retrieve the block following 
the TTR block. 
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Note: The first block of a magnetic tape data set is always specified by the $ 

hexadecimal value 00000001. The first block of a direct-access device data set V^ 

can be specified by either hexadecimal 00000001 or 00000100 (see the previous 
description of TTRz). 

If the volume cannot be positioned correctly or if the block identification is not of the 
correct format, the error analysis (SYNAD) routine is given control when the next 
READ or WRITE macro instruction is executed. 



c 
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PRTOV 

PRTOV— Test for Printer Carriage Overflow (BSAM and QSAM— Online 
Printer and 3525 Card Punch, Print Feature) 

The PRTOV macro instruction is used to control the page format for an online printer 
when carriage control characters are not being used or to supplement the carriage 
control characters that are being used. 

The PRTOV macro instruction causes the system to test for an overflow condition on 
the specified channel (either channel 9 or channel 12) of the printer carriage control, 
and either skip the printer carriage to the line corresponding to channel 1, or transfer 
control to the exit address, if one is specified. Overflow is detected after printing the 
line that follows the line corresponding to channel 9 or channel 12. 

When the PRTOV macro instruction is used with a 3525 card punch, print feature, 
channel 9 or 12 can be tested. If an overflow condition occurs, control is passed to the 
overflow exit routine if the overflow exit address is coded, or a skip to channel 1 (first 
print-line of the next card) occurs. 

When requesting overprinting (for example, to underscore a line), the PRTOV macro 
instruction is issued before the first PUT or WRITE macro instruction only. The 
PRTOV macro instruction should be issued only when the device type is an online 
| printer. PRTOV cannot be used to request overprinting on the 3525. 

The PRTOV macro instruction is written as follows: 







[symbol] 


PRTOV 


deb address,) 9 ( [overflow exit address 
|l2( L 



deb address — RX-Type Address or (2-12) 

The deb address operand specifies the address of the data control block opened 
for output to an online printer or 3525 card punch with a print feature. 

9 — Coded as shown 

12 — Coded as shown 

These operands specify which channel is to be tested by the PRTOV macro 
instruction. For an online printer, 9 and 12 correspond to carriage control 
channels 9 and 12. For the 3525 card punch, 9 corresponds to print line number 
17, and 12 corresponds to print line number 23. More detail about the card 
print-line format is included in the OS Data Management Services Guide. 

overflow exit address — RX-Type Address or (2-12) 

The overflow exit address operand specifies the address of the user-supplied 
routine to be given control when an overflow condition is detected on the 
specified channel. If this operand is omitted, the printer carriage skips to the first 
line of the next page or the 3525 skips to the first line of the next card before 
executing the next PUT or WRITE macro instruction. 
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When the overflow exit routine is given control, the contents of the registers are f~^< 

as follows: \_Z 

Register Contents 

and 1 The contents are destroyed. 

2-13 The same contents as before the macro instruction was executed. 

14 Return address. 

15 Overflow exit routine address. 



\_ 
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PUT— QISAM 



PUT— -Write Next Logical Record (QISAM) 



© 



The PUT macro instruction causes the system to write a record into an indexed 
sequential data set. If the move mode is used, the PUT macro instruction moves a 
logical record into an output buffer from which it is written. If the locate mode is 
specified, the address of the next available output buffer segment is available in register 
1 after the PUT macro instruction is executed. The logical record can then be 
constructed in the buffer for output as the next record. The records are blocked by the 
system (if specified in the data control block) before being placed in the data set. The 
system uses the length specified in the record length (DCBLRECL) field of the data 
control block as the length of the record currently being written. When constructing 
blocked variable-length records in the locate mode, the problem program may either 
specify the maximum record length once in the DCBLRECL field of the data control 
block or provide the actual record length in the DCBLRECL field before issuing each 
PUT macro instruction. Use of the maximum record length may result in more but 
shorter blocks, since the system uses this length when it tests to see if the next record 
can be contained in the current block. 

The PUT macro instruction is used to create or extend an indexed sequential data set. 
To extend the data set, the key of any added record must be higher than the highest 
key existing in the data set, and the disposition parameter of the DD card must be 
specified as DISP=MOD. The new records are placed in the prime data space, starting 
in the first available space, until the original space allocation is exhausted. 

To create a data set using previously allocated space, the disposition parameter of the 
DD card must specify DISP=OLD. 

The PUT macro instruction is written as follows: 



[symbol J 


PUT 


deb address [, area address] 



deb address-— RX-Type Address, (2-12), or (1) 

The deb address operand specifies the address of the data control block for the 
opened ISAM data set. 

area address — RX-Type Address, (2-12), or (0) 

The area address operand specifies the main-storage address of the area that 
contains the record to be written (move mode only). Either move or locate mode 
can be used with QISAM, but they must not be mixed within the specified data 
control block. The following describes operations for locate and move modes: 

Locate Mode: If the locate mode is specified in the data control block, the 
area address operand must be omitted. The system returns the address of the 
next available buffer in register 1; this is the buffer into which the next record is 
placed. The record is not written until another PUT macro instruction is issued 
for the same data control block. The last record is written when a CLOSE macro 
instruction is issued to close the data set. 

Move Mode: If the move mode has been specified in the data control block, the 
area address operand must specify the main-storage address in the problem 
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program that contains the record to be written. The system moves the record £~ ^ 

from the area to an output buffer before control is returned. If the area address V^ 

operand is omitted, the system assumes that register zero contains the area 
address. 

Put Routine Exit 

The error analysis (SYNAD) routine is given control if the output operation could not 
be completed satisfactorily. The contents of the registers when the error analysis 
routine is given control are described in Appendix A. 
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PUT— QSAM 



PUT— Write Next Logical Record (QSAM) 



The PUT macro instruction causes the system to write a record in a sequential data set. 
Various modes are available and are specified in the DCB macro instruction. In the 
locate mode, the address of an area within an output buffer is returned in register 1 
after the macro instruction is executed. The user should subsequently construct, at this 
address, the next sequential record or record segment. The move mode of the PUT 
macro instruction causes a logical record to be moved into an output buffer. In the 
data mode, which is available only for variable-length spanned records, the PUT macro 
instruction moves only the data portion of the record into one or more output buffers. 
When the substitute mode is specified, the macro transfers ownership of a work area 
containing a record to the control program. In return, the ownership of a buffer 
segment is transferred to the user, for use as a work area. There is no movement of 
data in main storage. 

The records are blocked by the control program (as specified in the data control block) 
before being placed in the data set. For undefined-length records, the DCBLRECL 
field determines the length of the record that is subsequently written. For 
variable-length records, the DCBLRECL field is used to locate a buffer segment of 
sufficient size (locate mode), but the length of the record actually constructed is 
verified before the record is written. For variable-length spanned records, the system 
segments the record according to the record length, buffer length, and amount of 
unused space remaining in the output buffer. The smallest segment created will be 5 
bytes, 4 for the segment descriptor word plus one byte of data. 

If the ASCII translation routines are included when the operating system is generated, 
translation can be requested by coding LABEL=(,AL) or (,AUL) in the DD statement, 
or it can be requested by coding OPTCD=Q in the DCB macro instruction or DCB 
subparameter of the DD statement. When translation is requested, all QSAM records 
whose record format (RECFM operand) is F, FB, D, DB, or U are automatically 
translated from EBCDIC code to ASCII code. For translation to occur correctly, all 
output data must be in EBCDIC code; any EBCDIC character that cannot be 
translated into an ASCII character is replaced by a substitute character. 

The PUT macro instruction is written as follows: 



symbol 


PUT 


deb address Larea address 



deb address— RX-Type Address, (2-12), or (1) 

The deb address operand specifies the address of the data control block for the 
data set opened for output. 

area address — RX-Type Address, (2-12), or (0) 

The area address operand specifies the address of a main-storage area that 
contains the record to be written (move or data mode), or it specifies the address 
of a main-storage area to be exchanged for a buffer (substitute mode). The 
move, locate, data, or substitute mode can be used with QSAM, but they must 
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not be mixed within the specified data control block. If the area address 
operand is omitted in the move, data, or substitute mode, the system assumes that 
register zero contains the area address. The following describes the operation of 
the four modes: 

Locate Mode: If the locate mode is specified, the area address operand must 
be omitted. The system returns the address of the next available buffer in register 
1 ; this is the buffer into which the next record is placed. 

When variable-length spanned records are used and a record area has been 
provided for a logical record interface (BFTEK=A has been specified in the data 
control block or a BUILDRCD macro instruction has been issued), the address 
returned in register 1 points to an area large enough to contain the maximum 
record size (up to 32,756 bytes). The system segments the record and writes all 
segments, providing proper control codes for each segment. If, for variable-length 
spanned records, an area has not been provided, the actual length remaining in 
the buffer will be returned in register 0. In this case, it is the user's responsibility 
to segment the records and process them in terms of record segments. The record 
or segment is not written until another PUT macro instruction is issued for the 
same data control block. The last record is written when the CLOSE macro 
instruction is issued. 

When a PUT macro instruction is used in the locate mode, the address of the 
buffer for the first record or segment is obtained by issuing a PUT macro 
instruction; QSAM returns the address of the buffer, but the record is not written 
until the next PUT macro instruction is issued. 

Move Mode: If the move mode has been specified in the data control block, the 
area address operand specifies the address of the main-storage area that contains 
the record to be written. The system moves the record to an output buffer before 
control is returned. The address of the main-storage area is returned in register 1 
(this action provides compatibility with substitute mode operations, and makes it 
possible for the problem program to be used in instances where substitute mode is 
requested but cannot be supported by the system). 

Data Mode: If the data mode is specified in the data control block (data mode 
can be specified for variable-length spanned records only), the area address 
operand specifies the address of a main-storage area in the problem program that 
contains the data portion of the record to be written. The system moves the data 
portion of the record to an output buffer before control is returned. The user 
must place the total data length in the DCBPRECL (not DCBLRECL) field of 
the data control block before the PUT macro instruction is issued. 

Substitute Mode: If the substitute mode is specified in the data control block, 
the area address operand specifies the address of a main-storage area in the 
problem program that contains the next record to be written. The area is 
exchanged for an empty buffer. The address of the empty buffer is returned in 
register 1. 

Put Routine Exit 

The error analysis (SYNAD) routine is given control if the output operation could not 
be completed satisfactorily. The contents of the registers when the error analysis 
routine is given control are described in Appendix A. 



1 50 OS Data Management Macro Instructions 



c 






o 



PUTX 



PUTX— Write a Record from an Existing Data Set (QISAM and QSAM) 



The PUTX macro instruction causes the control program to return an updated record 
to a data set (QISAM and QSAM) or to write a record from an input data set into an 
output data set (QSAM only). There are two modes of the PUTX macro instruction. 
The output mode (QSAM only) allows writing a record from an input data set on a 
different output data set. The output data set may specify the spanning of 
variable-length records, but the input data set must not contain spanned records. 

The update mode returns an updated record to the data set from which it was read. 
The record must always have been brought into main storage by a locate mode GET 
macro instruction. The logical records are blocked by the control program, as specified 
in the data control block, before they are placed in the output data set. The control 
program uses the length specified in the DCBLRECL field as the length of the record 
currently being stored. Control is not returned to the user's program until the control 
program has processed the record. 

The PUTX macro instruction is written as follows: 



[symbol] 


PUTX 


deb address L input deb address] 



© 



deb address RX-Type Address, (2-12), or (1) 

The deb address operand specifies the address of the data control block for a 
data set opened for output. 

input deb address — RX-Type Address, (2-12), or (0) 

The input deb address operand specifies the address of a data control block 
opened for input. The PUTX macro instruction can be used for the following 
modes: 

Output Mode: This mode is used with QSAM only. The input deb address 
operand specifies the address of the data control block opened for input. If this 
operand is omitted, the system assumes that register contains the input deb 
address. 

Update Mode: The input deb address operand is omitted for update mode. 

PUTX Routine Exit 

The error analysis (SYNAD) routine is given control if the operation is not completed 
satisfactorily. The contents of the registers when the error analysis routine is given 
control are described in Appendix A. 
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READ— BDAM 



READ— Read a Block (BDAM) 



The READ macro instruction causes a block to be retrieved from a data set and placed 
in a designated area of main storage. Control may be returned to the problem program 
before the block is retrieved. The input operation must be tested for completion using 
a CHECK or WAIT macro instruction. A data event control block, shown in 
Appendix A, is constructed as part of the macro expansion. 

The standard form of the READ macro instruction is written as follows (the list and 
execute forms are shown following the descriptions of the standard form): 



[symbol] 


READ 


decb name, type, deb address, larea address 

1 '$' J 
jkey address), block address[,next address] 

1 v } 


, (length), 
1 'S' ] 



decb name — symbol 

The decb name operand specifies the name assigned to the data event control 
block created as part of the macro expansion. 



O 



type — *DI [F] 



ff>K 



[Rl 
[X] 



} 



[RU] 



[F] [R] } 
[X] [RU1 



The type operand is coded in one of the combinations shown above to specify the 
type of read operation and the optional services performed by the system. 

DI — Specifies that the data and key, if any, are to be read from a specific 

device address. The device address, which can be designated by any of 
the three addressing methods, is supplied by the block address 
operand. 

DK — Specifies that the data (only) is to be read from a device address 

identified by a specific key. The key to be used as a search argument 
must be supplied in the area specified by the key address operand; the 
search for the key starts at the device address supplied in the area 
specified by the block address operand. The description of the DCB 
macro instruction, LIMCT operand, contains a description of the 
search. 

F — Requests that the system provide block position feedback into the area 
specified by the block address operand. This character can be coded 
as a suffix to DI or DK as shown above. 

X — Requests exclusive control of the data block being read, and it requests 
that the system provide block position feedback into the area specified 
by the block address operand. The descriptions of the WRITE and 
RELEX macro instructions contain a description of releasing a data 
block that is under exclusive control. This character can be coded as a 
suffix to DI or DK as shown above. 
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R — Requests that the system provide next address feedback into the area 
specified by the next address operand. When R is coded, the 
feedback is the relative track address of the next data record. This 
character can be coded as a suffix to DI or DK, DIF, DIX, DKF, or 
DKX as shown above, but it can be coded only for use with 
variable-length spanned records. 

RU — Requests that the system provide next address feedback into the area 
specified by the next address operand. When RU is coded, the 
feedback is the relative track address of the next capacity record (RO) 
or data record whichever occurs first. These characters can be coded 
as a suffix to DI, DK, DIF, DIX, DKF, or DKX, but it can be coded 
only for use with variable-length spanned records. 

deb address— A-Type Address or (2-12) 

The deb address operand specifies the address of the data control block opened 
for the data set to be read. 

area address — A-Type Address, (2-12), or 'S' 

The area address operand specifies the address of the main-storage area into 
which the data block is to be placed. If 'S' is coded instead of an address, 
.dynamic buffering is requested (dynamic buffering must also be specified in the 
MACRF operand of the DCB macro instruction). When dynamic buffering is 
used, the system acquires a buffer and places its address in the data event control 
block. 

length — symbol, decimal digit, absexp, (2-12), or 'S' 

The length operand specifies the number of data bytes to be read up to a 
maximum of 32,760. If 'S' is coded instead of a length, the number of bytes to 
be read is taken from the data control block. 

key address — A-Type Address, (2-12), *S% or 

The key address operand specifies the address of the main-storage area for the 
key of the desired data block. If the search operation is made using a key, the 
area must contain the key. Otherwise, the key is read into the designated area. If 
the key is read and 'S' was coded for the area address, 'S' can also be coded for 
the key address; the key and data are read sequentially into the buffer acquired 
by the system. If the key is not to be read, specify instead of an address or 'S\ 

block address — A-Type Address or (2-12) 

The block address operand specifies the address of the main-storage area 
containing the relative block address, relative track address, or actual device 
address of the data block to be retrieved. The device address of the data block 
retrieved is placed in this area if block position feedback is requested. The length 
of the main-storage area that contains the address depends on whether the 
feedback option (OPTCD=F) has been specified in the data control block and if 
the READ macro instruction requested feedback. 

If OPTCD=F has been specified, feedback (if requested) is in the same form as 
was originally presented by the READ macro instruction, and the field can be 
either three or eight bytes long depending on the type of addressing. 
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READ— BDAM 

If OPTCD=F has not been specified, feedback (if requested) is in the form of an 
actual device address, and the field must be eight bytes long. 

next address— A-Type Address or (2-12) 

The next address operand specifies the address of the main-storage area where 
the system places the relative address of the next record. The length operand 
must be specified as 'S'. When the next address operand is specified, an R or 
RU must be added to the type operand (for example, DIR or DIRU). The R 
indicates that the next address returned is the next data record. RU indicates that 
the next address returned is for the next data or capacity record, whichever occurs 
first. The next address operand can be coded only for use with variable-length 
spanned records. 
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READ— BPAM and BSAM 



READ— Read a Block (BPAM and BSAM) 



O 



The READ macro instruction causes a block to be retrieved from a data set and placed 
in a designated area of main storage. Control may be returned to the prob em program 
before the block is retrieved. The input operation must be tested for completion using a 
CHECK m acro instruction. A data event control block, shown in Appendix A, is 
"constructed as part of the macro expansion. 

If the OPEN macro instruction specifies UPDAT, both the READ and WRITE macro 
instruction must refer to the same data event control block. Refer to the list form of 
the READ or WRITE macro instruction for a description of how to construct a data 
event control block; refer to the execute form of the READ or WRITE macro 
instruction for .a description of how to modify an existing data event control block. 

The standard form of the READ macro instruction is written as follows (the list and 
execute forms are shown following the descriptions of the standard form instructions): 



[symbotj 



READ 



decb name, type, deb address, area address, j length 

V 



decb name — symbol 

The decb name operand specifies the name assigned to the data event control 
block (DECB) created as part of the macro expansion. 

type — {SF} {SB} 

The type operand is coded as shown to specify the type of read operation. 
SF — Specifies normal, sequential forward,, retrieval. 

SB — Specifies a read backward operation; this operand can be specified 
only for magnetic tape with format-F or format-U records. 

deb address — A-Type Address or (2-12) 

The deb address operand specifies the address of the data control block for the 
opened data set to be read. 

area address— A-Type Address or (2-12) 

The area address operand specifies the address of the main-storage area into 
which the record is placed. When a READ SB macro instruction is issued, the 
area address must be the address of the last byte of the area into which the 
record is read. If the data set contains keys, the key is read into the butter 
followed by the data. 



o 
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length — symbol, decimal digit, absexp, (2-12), or 'S' 

The length operand specifies the number of data bytes to be read, to a maximum 
of 32,760. (If the data is translated from ASCII code to EBCDIC code, the 
maximum number of bytes that can be read is 2048.) A number can be coded 
only for format-U records^ The number of bytes to be read is taken from the 
data control block if 'S' is coded instead of a number. (This operand is ignored 
for format-F or format-V records.) F or format-D records only, the length of the 
record just read is automatically inserted into the DCBLRECL field if 
BUFOFF=(L) is not specified in the data control block. 



o 
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READ— BSAM 

READ— Read a Block (Offset Read of Keyed BDAM Data Set Using BSAM) 

The READ macro instruction causes a block to be retrieved from a data set and placed 
in a designated area of main storage. The data set is a BDAM data set and its record 
format is unblocked variable-length spanned records. BFTEK=R must be specified in 
the data control block. Control may be returned to the problem program before the 
block is retrieved. The input operation must be tested for completion using a CHECK 
macro instruction. A data event control block, shown in Appendix A, is constructed as 
part of the macro expansion. 

The standard form of the READ macro instruction is written as follows (the list and 
execute forms are shown following the descriptions of the standard form): 



o 



[symbol] 



READ 



decb name, type, deb address,area address 



decb name — symbol 

The decb name operand specifies the name assigned to the data event control 
block (DECB) created as part of the macro expansion. 

type—SP 

The type operand is coded as shown to specify the type of read operation. 

SF Specifies normal, sequential, forward operation. 
deb address— A-Type Address or (2-12) 

The deb address operand specifies the address of the data control block for the 
opened BDAM data set to be read. 

area address —A-Type Address or (2-12) 

The area address operand specifies the address of the main-storage area into 

which the record is placed. 
When a spanned BDAM data set is created with keys, only the first segment of a 
record has a key; successive segments do not. When a spanned record is retrieved by 
the READ macro instruction, the system places a segment in a designated area 
addressed by the area address operand. The problem program must assemble all the 
segments into a logical record. Since only the first segment has a key, the successive 
segments are read into the designated area offset by key length to ensure that the 
block-descriptor word and the segment-descriptor word are always in the same relative 
position. 



Macro Instruction Descriptions 159 






V 



c 



o 



READ— BISAM 



READ— Read a Record (BISAM) 



The READ macro instruction causes a block containing a specified logical record to be 

retrieved from a data set. The block is placed in a designated area of main storage, and 

the address of the logical record is placed in the data event control block. The data 

event control block is constructed as part of the macro expansion and is described in 

Appendix A. 

Control may be returned to the problem program before the block is retrieved. 

The input operation must be tested for completion using a WAIT or CHECK macro 

instruction. 

The standard form of the READ macro instruction is written as follows for BISAM 

(the list and execute forms are shown following the descriptions of the standard form): 



[symbol] 



READ 



decb name, type, deb address,) area address! , 

'S' 



length \, key address 



flengt 






o 



decb name — symbol 

The decb name operand specifies the name assigned to the data event control 
block (DECB) created as part of the macro expansion. 

type — {K} {KV\ 

The type operand is coded as shown to specify the type of read operation. 

K Specifies normal retrieval. 

KU Specifies that the record retrieved is to be updated and returned to the data 
set; the system saves the device address to be returned. 

When an ISAM data set is being updated with a READ KU macro 
instruction and a WRITE K macro instruction, both the READ and WRITE 
macro instructions must refer to the same data event control block. This 
update operation can be performed by using a list-form instruction to create 
the list (data event control block) and by using the execute form of the 
READ and WRITE macro instructions to refer to the same list. 

deb address — A-Type Address or (2-12) 

The deb address operand specifies the address of the data control block for the 
opened data set to be read. 

area address— A-Type Address, (2-12), or *S' 

The area address operand specifies the address of the main-storage area into 
which the data block is placed. The first sixteen bytes of this area are used by 
the system and do not contain information from the data block. Dynamic 
buffering is specified by coding 'S' instead of an address; the address of the 
acquired main-storage area is returned in the data event control block. Indexed 
sequential buffer and work area requirements are described in OS Data 
Management Services Guide. 
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length — symbol, decimal digit, absexp, (2-12), or 'S' v*~>^ 

The length operand specifies the number of bytes to be read up to a maximum of \^f 

32,760. If 'S' is coded instead of a length, the number of bytes to be read is 
taken from the count field of the record; for blocked records, 'S* must be coded. 

key address — A-Type Address or (2-12) 

The key address operand specifies the address of a main-storage area containing 
the key of a logical record in the block that is to be retrieved. When the input 
operation is completed, the main-storage address of the logical record is placed in 
the data event control block. 



( 
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READ — List Form 



READ — List Form 



O 



The list form of the READ macro instruction is used to construct a data management 

parameter list in the form of a data event control block (DECB). Refer to Appendix A 

for a description of the various fields of the DECB for each access method. 

The description of the standard form of the READ macro instruction provides the 

explanation of the function of each operand. The description of the standard form also 

indicates the operands used for each access method, as well as the meaning of S when 

coded for the area address, length, and key address operands. For each access method, 

'S' can be coded only for those operands for which it can be coded in the standard 

form of the macro instruction. The format description below indicates the optional and 

required operands in the list form only. 

The list form of the READ macro instruction is written as follows: 



[symbol] 



READ 



decb name, type, [deb address], farea address!, 
[length"], [key address! , [block address] , [next address] 



# MF=L 



decb name — symbol 

type _ Code one of the types shown in the standard form 

deb address — A-Type Address or 'S' 

area address — A-Type Address or 'S' 

length — symbol, decimal digit, absexp, or 'S' 

key address — A-Type Address or 'S' 

block address — A-Type Address 

next address — A-Type Address 

MF=L — Coded as shown 

The MF=L operand specifies that the READ macro instruction is used to create a 
data event control block that can be referenced by an execute-form instruction. 



o 
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READ — Execute Form 



READ — Execute Form 



o 



A remote data management parameter list (data event control block) is used in, and 
can be modified by, the execute form of the READ macro instruction. The data event 
control block can be generated by the list form of either a READ or WRITE macro 
instruction. 

The description of the standard form of the READ macro instruction provides the 
explanation of the function of each operand. The description of the standard form also 
indicates the operands used for each access method, as well as the meaning of S when 
coded for the area address, length, and key address operands. For each access method, 
'S' can be coded only for those operands for which it can be coded in the standard 
form of the macro instruction. The format description below indicates the optional and 
required operands in the execute form only. 
The execute form of the READ macro instruction is written as follows: 



[symbol] 



READ 



decb address, type, [deb address], ["area address!, 
[length! ,[~key address! , [block address], [next address] 



.MF=E 



decb address — RX-Type Address or (2-12) 

type _ Code one of the types shown in the standard form 

deb address — RX-Type Address or (2-12) 

area address — RX-Type Address, (2-12), or <S' 

length _ symbol, decimal digit, absexp, (2-12), or 'S' 

key address — RX-Type Address, (2-12), or 'S' 

block address — RX-Type Address, or (2-12) 

next address — RX-Type Address or (2-12) 

jyip_£ — Coded as shown 

The MF=E operand specifies that the execute form of the READ macro 
instruction is used, and that an existing data event control block (specified in the 
decb address operand) is used by the access method. 
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RELEX 



o 

RELEX — Release Exclusive Control (BDAM) 

The RELEX macro instruction causes release of a data block from exclusive control. 

The block must have been requested in an earlier READ macro instruction which 

specified either DIX and DKX. The RELEX macro instruction must be issued by the 

same task that opened the data set. 

Note: A WRITE macro instruction which specifies either DIX or DKX can also be 

used to release exclusive control. 

The RELEX macro instruction is written as follows: 



[symbol J 



RELEX 



D,dcb address, block address 



O 



D — specifies direct access. 

deb address— RX-Type Address, (2-12), or (1) 

The deb address operand specifies the address of the data control block for a 
BDAM data set opened for processing. The deb address operand must specify 
the same data control block as designated in the associated READ macro 
instruction. 

block address— RX-Type Address, (2-12), or (0) 

The block address operand specifies the address of the main-storage area 
containing the relative block address, relative track address, or actual device 
address of the data block being released. The block address operand must 
specify the same main-storage area as designated in the block address operand of 
the associated READ macro instruction. 

Completion <**» ^ retums cofltrol t0 the problem program , the low-order byte of register 

15 contains one of the following return codes; the three high-order bytes of register 15 
are set to zero. 

Hexadecimal Meaning 
Code 

00 Operation completed successfully. 

04 The specified data block list. 

08 The relative track address, relative block address, or actual device address 

was not within the data set. 



%nr 
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RELSE 



RELSE— Release an Input Buffer (QISAM and QSAM Input) 



The RELSE macro instruction causes immediate release of the current input buffer. 
The next GET macro instruction retrieves the first record from the next input butter. 
For variable-length spanned records (QSAM), the input data set is spaced to the next 
segment which starts a logical record in a subsequent block. Thus, one or more blocks 
of data or records may be skipped. The RELSE macro instruction is ignored if a buffer 
has just been completed or released, or if the records are unblocked. 

The RELSE macro instruction is written as follows: 



[symbol] 



RELSE 



deb address 



deb address — RX-Type Address, (2-12), or (1) 

The deb address operand specifies the address of the data control block for the 
opened input data set. 



o 
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SETL 



SETL — Set Lower Limit of Sequential Retrieval (QISAM Input) 



The SETL macro instruction causes the control program to start processing the next 
input request at the specified record or device address. Sequential retrieval of records 
using the GET macro instruction continues from that point until the end of the data set 
is encountered or a CLOSE or ESETL macro instruction is issued. An ESETL macro 
instruction must be issued between SETL macro instructions that specify the same data 
set. 

The SETL macro instruction can specify that retrieval is to start at the beginning of the 
data set, at a specific address on the device, at a specific record, or at the first record 
of a specific class of records. For additional information on SETL functions, see OS 
Data Management Services Guide. 

The SETL macro instruction is written as follows: 



[symbol] 


SETL 


deb address, 

i 


r ^ 
K[H], lower limit address 
KC, lower limit address 
KD[H], lower limit address 
KCD, lower limit address 
1, lower limit address 
ID, lower limit address 
B 

BD 
k. J 


> 



deb address — RX-Type Address, (2-12), or (1) 

The deb address operand specifies the address of the data control block opened 
for the indexed sequential data set being processed. 

The following operands are coded as shown, and they specify the starting point and 
type of retrieval. 

K — Specifies that the next input operation begins at the record containing the 
key specified in the lower -limit address operand. 

KC — Specifies that the next input operation begins at the first record of the key 
class specified in the lower-limit address operand. If the first record of the 
specified key class has been deleted, retrieval begins at the next nondeleted 
record regardless of key class. 

H — This option, used with either K or KD, specifies that, if the key in the 

lower-limit address operand is not in the data set, retrieval begins at the 
next higher key. The character H cannot be coded with the key class 
operands (KC and KCD). 

KD — Specifies that the next input operation begins at the record containing the 
key specified in the lower-limit address operand, but only the data portion 
of the record is retrieved. This operand is valid only for unblocked records. 

KCD — Specifies that the next input operation begins at the first record of the key 
class specified in the lower-limit address operand, but only the data portion 
of the record is retrieved. This operand is valid only for unblocked records. 
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I — Specifies that the next input operation begins with the record at the actual 
device address specified in the lower-limit address operand. 

ID — Specifies that the next input operation begins with the record at the actual 
device address specified in the lower-limit address operand, but only the 
data portion of the record is retrieved. This operand is valid only for 
unblocked records. 

B — Specifies that the next input operation begins with the first record in the 
data set. 

BD — Specifies that the next input operation begins with the first record in the 
data set, but only the data portion is retrieved. This operand is valid only 
for unblocked records. 

lower limit address — RX-Type Address, (2-12), or (0) 

The lower-limit address operand specifies the address of the main-storage area 
containing the key, key class, or actual device address that designates the starting 
point for the next input operation. If I or ID has been specified, this area must 
contain the actual device address (in the form MBBCCHHR) of a prime data 
record; the other types require that the key or key class be contained in this area. 

SETL Exit 

The error analysis (SYNAD) routine is given control if the operation could not be 
completed successfully. The exceptional condition code and general registers are set as 
shown in Appendix A. If the SETL macro instruction is not reissued, retrieval starts at 
the beginning of the data set. 
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SETPRT 



SETPRT— Load UCS and FCB Images (BSAM and QSAM) 



O 



The SETPRT macro instruction is used with printers that have a universal character set 

(UCS) buffer or a forms control buffer (FCB). When a SETPRT macro instruction is 

issued UCS and FCB images are fetched from the image library and loaded from main 

storage into their respective buffers. The SETPRT macro instruction is also used to 

block or unblock printer data checks. 

IBM character sets and forms control images are included in the image library at system 

generation; user-defined character sets and forms control images can be added to the 

image library as described in OS Data Management for System Programmers 

publication. The FCB image can also be defined in the problem program using the exit 

list (EXLST) parameter of the DCB macro instruction. 

When BSAM is being used, all write operations must be checked for completion before 

the SETPRT macro instruction is issued; any incomplete write operations are purged. 

Issuing the SETPRT macro instruction for a device other than an online UCS printer 

results in a NOP instruction. 

Note: Do not use SETPRT with EXCP programming. 

The standard form of the SETPRT macro instruction is written as follows (the list and 

execute form are shown following the standard form): 



[symbol] 




deb address 



f,F[OLD] 
,UCS=(csc ,F[OLD],V[ERIFY] 
[,,V[ERIFY] 

[, FCB= (image-id 



"> 



,V[ERIFY] 
,A[LIGN] 



) [ / OPTCD=fB)] 



W 



,FCB= (image-id TvCERIFY]]) [,OPTCD= ( (Bl 
[,A[LIGN]J lUf 



,F[OLD] 
,U[NFOLD] 



,OPTCD= ( 



il)[. 



F[OLD] 
U[NFOLD] 



deb address— A-Type Address or (2-12) 

The deb address operand specifies the address of the data control block for the 
data set to be printed; the data set must be opened for output before the 
SETPRT macro instruction is issued. 

UCS= — A character code with options 

The UCS operand specifies that the UCS buffer is to be loaded from the image 
library. When the UCS operand is specified, the FCB and OPTCD operands can 
also be specified. 
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csc (character set code) 

The csc operand specifies the character set to be loaded. A character set is 
identified by a 1-4 character code. Codes for standard IBM character sets are as 
follows: 

1403 Printer: AN, HN, PCAN, PCHN, PN, QN, QNC, RN, SN, TN, XN, 

and YN 

3211 Printer All, Hll, Gil, Pll, and Til 

For descriptions of the standard IBM character sets, refer to OS Operator's 
Procedures; codes for user-designed character sets are defined by the installation. 

F or FOLD 

Specifies that the character set image is to be loaded in the fold mode. The 
fold mode is most often used when the EBCDIC code for lowercase 
alphabetic characters is printed as uppercase characters by a print train with 
lowercase type. 

V or VERIFY 

Requests that the character set image be displayed on the printer for visual 
verification. 

FCB= — A character code with options 

The FCB operand specifies that the forms control buffer (FCB) is to be loaded 
from the image library. When the FCB operand is specified, the OPTCD operand 
can also be specified. 

image id 

The image id operand specifies the forms control image to be loaded. A 
forms control image is identified by a 1-4 character code. IBM-supplied 
images are identified by image id value of STD1 and STD2; user-designed 
forms control images are defined by the installation. For descriptions of the 
standard forms control images, refer to the OS System Generation 
publication. 

V or VERIFY 

Requests that the forms control image be displayed on the printer for visual 
verification. This operand allows forms alignment using the WTOR macro 
instruction. 

A or ALIGN 

Allows forms alignment using the WTOR macro instruction. 

OPTCD = — A printer option code 

The OPTCD operand specifies whether UCS printer data checks are blocked or 
unblocked and if the printer is to operate in fold or normal mode. 

B 

Specifies that UCS printer data checks are blocked; this option updates the 
DCBOPTCD field of the data control block. 



U 



Specifies that UCS printer data checks are unblocked; this option updates 
the DCBOPTCD field of the data control block. 



F or FOLD 

Specifies that printing is in fold mode. 
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Completion Codes 



^m*r 



SETPRT 

U or UNFOLD , . . , , . 

Specifies that printing is in normal mode; this operand causes fold mode to 

revert to normal mode. 

After the SETPRT macro instruction is executed, a return code is placed in register 15, 
and control is returned to the instruction following the SETPRT macro -^ruction. 
Bits 16-23 indicate the result of the attempt to load the forms control buffer (FCB). 
Bits 24-31 indicate the result of the attempt to load a universal-character-set (UCS) 
buffer. For completion codes 18, 1C, 20, and 24, bits 24-31 apply to both FCB and 
UCS loading. The codes in the following table are in hexadecimal. 



Bits 16-23 
FCB Code 

00 

04 



08 



Bits 24-31 
UCS Code 

00 

04 



08 



0C 
10 

14 



0C 
10 

14 



Bits 24-31 
FCB and 
UCS Code 

18 



1C 



Meaning 

Successful completion. 

The operator canceled the load because either the image 

could not be found in the image library or, in the case 

of the UCS image, the requested chain or train was not 

available. 

A permanent I/O error was detected when the BLDL 

macro instruction was issued to locate the image in the 

image library. 

A permanent I/O error persisted after two attempts 

were made to load the FCB/UCS buffer. 

A permanent I/O error was detected when an attempt 

was made to display the character set image or forms 

control image on the printer for visual verification. 

The operator canceled the load because the wrong 

image was displayed for visual verification. 



No operation was performed for one of the following 

reasons: 

. The data control block was not open. 

. The data control block was not valid for a 

sequential data set. 
. The SETPRT parameter list was not valid. 
. The output device was not a UCS printer. 
. SETPRT was used with EXCP programming. 
No operation was performed because an uncorrectable 
error occurred in a previously initiated output operation. 
The error analysis (SYNAD) routine is entered when 
the next PUT or CHECK macro instruction is issued. 
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20 



24 



No operation was performed because an uncorrectable 
error occurred when the Block Data Check or Reset 
Block Data Check command was issued by SETPRT. 

Not enough space has been provided for the 
IMAGELIB control blocks. Increase the amount of 
space allocated for the job step. 

SYS1. IMAGELIB cannot be opened to load the 
specified UCS/FCB image. 
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SETPRT— List Form 



SETPRT— List Form 



O 



The list form of the SETPRT macro instruction is used to construct a data management 
parameter list. 

The description of the standard form of the SETPRT macro instruction provides the 
explanation of the function of each operand. The description of the standard form also 
indicates which operands are totally optional and those required in at least one of the 
pair of list and execute forms. The format description below indicates the optional and 
required operands for the list form only. 

The list form of the SETPRT macro instruction is written as follows: 




;f[old] i 

,F[OLD] ,V[ERIFY] ) 
,,V[ERIFY] I 



[,FCB=( 



image-Id r,V[ERIFY]l)][ / OPTCD= i B )] 
[,A[UGN]J lUf 

MeRIFY]!) [,OPTCD= ((B) rFfbLD] ])] 
,A[LIGN]J \uf [,U[NFOLD]J 

>[OLD] 1) 
^[NFOLDJJ 



J 



deb address— A-Type Address 
UCS= — A character code with options 

It is coded as described in the standard form of the macro instruction. 
FCB= — A character code with options 

It is coded as described in the standard form of the macro instruction. 
OPTCD= — A printer option code 

It is coded as described in the standard form of the macro instruction. 

MF=L 

The MF=L operand specifies that the list form of the macro instruction is used to 
create a parameter list that can be referenced by an execute form of the SETPRT 
macro instruction. 
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SETPRT — Execute Form 



SETPRT — Execute Form 



O 



A remote data management parameter list is referred to, and can be modified by, the 

execute form of the SETPRT macro instruction. 

The description of the standard form of the SETPRT macro instruction provides the 

explanation of the function of each operand. The description of the standard form also 

indicates which operands are totally optional and those required in at least one of the 

pair of list and execute forms. The format description below indicates the optional and 

required operands for the execute form only. 

The execute form of the SETPRT macro instruction is written as follows: 



[symbolj 



SETPRT 



deb address 



r 



,UCS=(csc 



>[OLD] 

,F[OLD] ,V[ERIFY] 

,,V[ER1FY] 



[,FCB= (image-id |",V[ERIFY]])] [,OPTCD= m 
[,A[UGN]J lUl 

,FCB= (image-id r,V[ERIFY]l) [,OPTCD= ( ( B \ [>[OLR] 1)j] 
|_,A[UGN]J \uf[,U[NFOLD]J 

mr,FfcLD] 1 

\Ul[,U[NFOLD]J 



,OPTCD=( /B\|,FLOLDJ _j) 

data management list address 



,MF=(E, 



(1) 



deb address— RX-Type Address or (2-12) 
UCS= — A character code with options 

It is coded as shown in the standard form of the macro instruction. 
FCB= — A character code with options 

It is coded as shown in the standard form of the macro instruction. 
OPTCD= — A printer option code 

It is coded as shown in the standard form of the macro instruction. 
MF=(E, { data management list address X) 

{(1) * 

This operand specifies that the execute form of the SETPRT macro instruction is 

used, and an existing data management parameter list is used. 

E — Coded as shown 

data management list address —RX-Type Address, (2-12), or (1) 
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STOW 



STOW— Update Partitioned Data Set Directory (BPAM) 



The STOW macro instruction causes the system to update a partitioned data set 
directory by adding, changing, replacing, or deleting an entry in the directory. Only 
one entry can be updated at a time using the STOW macro instruction. If the entry to 
be added or replaced is a member name, the system writes an end-of-data indication 
following the member. All input and output operations using the same data control 
block must have previously been tested for completion. 

The STOW macro instruction is written as follows: 



[symbo ll 


STOW 


deb address, list address ^directory action] 



o 



deb address — RX-Type Address, (2-12), or (1) 

The deb address operand specifies the address of the data control block for the 
opened partitioned data set. The STOW macro instruction can be used only when 
the data set is opened for OUTPUT, UPDAT or OUTIN (BSAM). 

list address — RX-Type Address, (2-12), or (0) 

The list address operand specifies the address of the main-storage area containing 
the information required by the system to maintain the partitioned data set 
directory. The size and format of the area depend on the directory action 
requested as follows: 

Adding or Replacing a Directory Entry: The list address operand must specify an 
area at least 12 bytes long and beginning on a half word boundary. The following 
illustration shows the format of the area: 

List Address 



Length 
Bytes 



NAME 



TTR 



USER DATA 



8 



1 to 62 



NAME 

Specifies the member name or alias being added or replaced. The name 
must begin in the first byte of the field and be padded on the right with 
blanks, if necessary, to complete the 8-byte field. 



TT 



Specifies the relative track number on which the beginning of the data set is 
located. 



Specifies the relative block (record) number on the track identified by TT. 
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Note: The TTR field shown above must be supplied by the problem program if 

an alias (alias bit is 1) is being added or replaced. The system supplies the TTR if 

field when a member name is being added or replaced. \_> 

C 

Specifies the type of entry (member or alias) for the name, the number of 
note list fields (TTRNs), and the length in half words, of the user data field. 
The following describes the meaning of the eight bits. 
Bit 0=0 — Indicates a member name. 

Bit 0=1 — Indicates an alias. 

Bits 1 and 2 — Indicate the number of TTRN fields (maximum 

of three) in the user data field. 
Bits 3-7 — Indicate the total number of half words in the 

user data field. 

Deleting a Directory Entry: The list address operand must specify an 8-byte area 
that contains the member name or alias to be deleted. The name must begin in 
the first byte of the area and be padded on the right with blanks, if necessary, to 
complete the eight bytes. 

Changing the Name of a Member: The list address operand must specify the 
address of a 16-byte area; the first 8 bytes contain the old member name or alias, 
and the second 8 bytes contain the new member name or alias. Both names must 
begin in the first byte of their 8-byte area and be padded on the right with 
blanks, if necessary, to complete the 8-byte field. 

directory action — [A] 

[C] /"> 

[D] V 
[Rl 

The directory action operand is coded as shown to specify the type of directory 

action. If the operand is not coded, A (add an entry) is assumed. 

A 

Specifies that an entry is to be added to the directory. 



C 
D 
R 



Specifies that the name of an existing member or alias is to be changed. 

Specifies that an existing directory entry is to be deleted. 

Specifies that an existing directory entry is to be replaced by a new directory 
entry. If R is coded but the old entry is not found, the new entry is added 
to the directory and a completion code of X'08' is returned in register 15. 
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o 



STOW 



omp ewn O e ^^ ^ ^^ ^^ ^^ ^ ^ problem program, register 15 contains one of 
the following return codes in the low-order byte; the three high-order bytes of register 
15 are set to zero. 
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Q OC j e Directory Action 

(Hexa- A R D C 

decimal) 

00 The update of the directory was completed successfully 

The directory - — The directory already contains 

already contains * he specified new name, 
the specified name. 

The specified name could The specified old name could 

not be found. not be found. 

0C No space left in the directory. — 

The entry could not be added 

or replaced. 
10 A permanent input or output error was detected when attempting to update the 

directory. Control is not given to the error analysis (SYNAD) routine. 

14 The specified data control block is not open or is opened incorrectly. 

18 Conditional GETMAIN with STOW macro instruction was unsuccessful. 



04 



08 
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SYNADAF 

SYNADAF— Perform SYNAD Analysis Function (BDAM, BISAM, BPAM, 
BSAM, EXCP, QISAM, and QSAM) 

The SYNADAF macro instruction is used in an error analysis routine to analyze 
permanent input/output errors. The routine can be a SYNAD routine specified in a 
data control block for BDAM, BISAM, BPAM, BSAM, QISAM, QSAM, or a routine 
that is entered directly from a program that uses the EXCP macro instruction. (The 
EXCP macro instruction is described in OS Data Management for System 
Programmers.) 

The SYNADAF macro instruction uses regigterj^to return the address of a buffer 
containing a message. The message describes the error, and can be printed T>y a 
subsequent PUT or WRITE macro instruction. The message consists of EBCDIC 
information and is in the form of a variable-length record. The format of the message 
is shown following the descriptions of the SYNADAF operands. 

The system does not use the save area whose address is in register 13. Instead, it 
provides a save area for its own use, and then makes this area available to the error 
analysis routine. The system returns the address of the new save area in register 13 
and in the appropriate location (word 3) of the previous save area; it also stores the 
address of the previous save area in the appropriate location (word 2) of the new save 
area. 

The SYNADAF macro instruction passes parameters to the system in registers and 1. 
When used in a SYNAD routine, it passes the parameters that are in these registers 
when the routine is entered, and it should therefore be coded at the entry point of the, 
routine (Refer to AppendixA , Figures 2 and 3.) To save these parameters for use by 
-tnTSY^fAD routine, the system stores them in a parameter save area that follows the 
message buffer as shown in the message buffer format. The system does not alter the 
return address in register 14 or the entry point address in register 15. 
When a SYNADAF macro instruction is used, a SYNADRLS m acro instruction must 
be used to release the message buffer and save areas, and to restore the original 
"contents of register 13. 
The SYNADAF macro instruction is written as follows: 




IACSMETH=BDAM J 
A ^Ju = dcam [,PARMl=parm register] [,PARM2=parm register]] 
ACSMETH-BbAM I [ 

ACSMETH^QSAiW] 
ACSMETH=BISAM/ 

ACSMETH=EXCP[ / PARMl=iob address] ^ 

ACSMETH=QlSAM[,PARM1=dcb address] [,PARM2=parm reg.sterj 



ACSMETH=BDAM, BPAM, BSAM, QSAM, BISAM, EXCP, or QISAM 

The ACSMETH operand specifies the access method used to perform the 
input/output operation for which error analysis is performed. 



o 
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PARM1 =parm register, iob address, or deb address — (2-12) or (1) /"^ 

The PARM1 operand specifies the address of information that is dependent on \^' 

the access method being used. For BDAM, BISAM, BPAM, BSAM, or QSAM, 

the operand specifies a register that contains the information that was in register 1 

on entry to the SYNAD routine. For QISAM, the operand specifies the address 

of the data control block; for EXCP, it specifies the address of the input/ output 

block. If the operand is omitted, PARM1=(1) is assumed. 

PARM2=parm register — (2-12), (0), or RX-Type Address (only if 
ACSMETH=QISAM) 

The PARM2 operand specifies the address of additional information that is 
dependent on the access method being used. For BDAM, BISAM, BPAM, 
BSAM, QISAM, and QSAM, the operand specifies a register that contains the 
information that was in register on entry to the SYNAD routine. For EXCP, 
the operand is meaningless and should be omitted. If the operand is omitted, 
except in the case of EXCP, PARM2=(0) is assumed. 

Completion Codes 

When the system returns control to the problem program, the low-order byte of register 
| contains one of the following return codes; the three high-order bytes of register 
are set to zero. 

Hexadecimal Meaning 
Code 

00 Successful completion. Bytes 8-13 of the message buffer contain blanks. 

04 Successful completion. Bytes 8-13 of the message buffer contain binary i 

data. 

08 Unsuccessful completion. The message can be printed, but some 

information is missing in bytes 50-127 and is represented by asterisks. 
Bytes 8-13 contain either blanks or binary data. 
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SYNADAF 

Message Buffer Format 

The following illustration shows the format of the message buffer; the address of the 
buffer is returned in register 1. 



c 



Message Buffer 
ByteO 4 



L L b b 



I I b b 



Doubleword 
Boundary 

LL= 128; 11 = 124;bb = 00 

50 



Input : 



Input 
Buffer 
Address 



12 



No. of 
Bytes 

Read 



14 "\ 



Output: 



(Blanks) 



14 



14 



(Blanks) 



■Y 



59 



Jobname 



Stepname 



68 



Unit 
Address 



72 



Device 
Type 



75 



DDname 



84 



91 



Operation 
Attempted 



Error Description 



107 



Parameter Save Area 



128 



Parameter 
Register 
(PARM2) 



132 



Parameter 
Register 1 
(PARM1) 



136 





107 










122 


128 


Unit Record: 


(Asterisks) 


/ 


Access 
Method 




107 


115 


120 


128 


Magnetic Tape: 


Relative Block 
Number (decimal) 


/ 


Access 

Method 


(Blanks) 




107 


122 


128 


Direct Access: 


Actual Track Address and Block Number 
(BBCCHHR tn hexadecimal format) 


' 


Access 

Method 





50 



84 



(End of Buffer - 
-Beginning of 
Parameter Save Area) 



Notes 

• The device type field (bytes 72-73) contains UR f or a unit record device, TA for 
a magnetic tape device, or DA f or a direct-access device. 

• If a message field (bytes 91-105) is not applicable to the type of error that 
occurred, it contains N/A or NOT APPLICABLE. 

• If no data was transmitted, or if the access method is QISAM, bytes 8-13 contain 
blanks. 

If the access method is BISAM, bytes 68-70, 84-89, and 107-120 contain 
asterisks. 

• If the access method is BDAM, and if the error was an invalid request, bytes 
107-120 contain EBCDIC zeros. 
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SYNADRLS 



SYNADRLS— Release SYNADAF Buffer and Save Areas (BDAM, BISAM, 
BPAM, BSAM, EXCP, QISAM, and QSAM) 

The SYNADRLS macro instruction releases the message buffer, parameter save area, 
and register save area provided by a SYNADAF macro instruction. It must be used to 
perform this function whenever a SYNADAF macro instruction is used. 
When the SYNADRLS macro instruction is issued, register 13 must contain the address 
of the register save area provided by the SYNADAF macro instruction. The control 
program loads register 13 with the address of the previous save area, and sets word 3 
of that save area to zero. Thus, when control is returned, the save area pointers are 
the same as before the SYNADAF macro instruction was issued. 

The SYNADRLS macro instruction is written as follows: 






o 



[symbol] SYNADRLS 



When the system returns control to the problem program, the low-order byte of register 
contains one of the following return codes; the three high-order bytes of register 
are set to zero. 



Hexadecimal Meaning 
Code 



00 Successful completion. 

08 Unsuccessful completion^ The buffer and save areas were not released; 

the contents of register 13 remain unchanged. Register 13 does not point 
to the save area provided by the SYNADAF macro instruction, or this 
save area is not properly chained to the previous save area. 
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TRUNC 

TRUNC— Truncate an Output Buffer (QSAM Output— Fixed- or 
Variable-Length Blocked Records) 

The TRUNC macro instruction causes the current output buffer to be regarded as full. 
The next PUT or PUTX macro instruction specifying the same data control block uses 
the next buffer to hold the logical record. 

When a variable-length spanned record is being truncated and logical record interface is 
specified (that is, if BFTEK=A is specified in the DCB macro instruction, or if a 
BUILDRCD macro instruction is issued), the system segments and writes the record 
before truncating the buffer. Therefore, the block being truncated is the one that 
contains the last segment of the spanned record. 

The TRUNC macro instruction is ignored if it is used for unblocked records; if it is 
used when a buffer is full, or if it is used without an intervening PUT or PUTX macro 
instruction. 

The TRUNC macro instruction is written as follows: 



[symbol] 



TRUNC 



deb address 



O 



deb address— RX-Type Address, (2-12), or (1) 

The deb address operand specifies the address of the data control block for the 
sequential data set opened for output. The record format in the data control 
block must not indicate standard blocked records (RECFM=FBS). 
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WAIT 



WAIT— Wait for One or More Events (BDAM, BISAM, BPAM, and BSAM) 

The WAIT macro instruction is used to inform the control program that performance of 
the active task cannot continue until one or more specific events, each represented by a 
different ECB (event control block), have occurred. ^ Bit of each ECB must be set to 
^0 b efore it is used. The control program takes the following action: 

• For each event that has already occurred (each ECB is already posted), the count 
of the number of events is decreased by 1. 

• If the number of events is by the time the last event control block is checked, 
control is returned to the instruction following the WAIT macro instruction. 

• If the number of events is not by the time the last ECB is checked, control is 
not returned to the issuing program until sufficient ECBs are posted to bring the 
number to 0. Control is then returned to the instruction following the WAIT 
macro instruction. 

A full description of the event control block is presented in the publication IBM 
System/ 360 Operating System: System Control Blocks, 

The WAIT macro instruction is written as follows: 



[symbol] 


WAIT 


[number of events,] { ECB=address \ 
lECBL1ST=address/ 



number of events 

The number of events operand is a decimal integer from to 255. Zero is an 
effective NOP instruction; one is assumed if the operand is omitted. The number 
of events must not exceed the number of event control blocks. 



ECB= 



The ECB operand is the address of the event control block representing the single 
event that must occur before processing can continue. The operand is valid only 
if the number of events is specified as one or is omitted. 

ECBLIST= 

The ECBLIST operand is the address of a main-storage area containing one or 
more consecutive fullwords on a fullword boundary. Each fullword contains the 
address of an event control block; the high-order bit in the last word (address) 
must be set to 1 to indicate the end of the list. The number of event control 
blocks must be equal to or greater than the specified number of events. 

Caution: A job step with all of its tasks in a WAIT condition is terminated upon 
expiration of the time limits that apply to it. 

Example: You have previously initiated one or more activities to be completed 
asynchronously to your processing. As each activity was initiated, you set up an ECB 
in which bits and 1 were set to 0. You now wish to suspend your task via the WAIT 
macro instruction until a specified number of these activities has been completed. 
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Completion of each activity must be made known to the system via the POST macro 
instruction. POST causes an addressed ECB to be marked complete. If completion of 
the event satisfies the requirements of an outstanding WAIT, the waiting task is marked 
ready and will be executed when its priority allows. 



c 



,J 



^ 



194 OS Data Management Macro Instructions 



o 



WRITE— BDAM 



WRITE— Write a Block (BDAM) 



The WRITE macro instruction causes the system to add or replace a block in an 
existing direct data set. (This version of the WRITE macro instruction cannot be used 
to create a direct data set because no capacity record facilities are provided.) Control 
may be returned before the block is written. The output operation must be tested for 
completion using a CHECK or WAIT macro instruction. A data event control block, 
shown in Appendix A is constructed as part of the macro expansion. 

The standard form of the WRITE macro instruction is written as follows (the list and 
execute forms are shown following the descriptions of the standard form): 



[symbol] 



WRITE 



decb name, type, deb address, f area address! , 



length 
'S' 



, I key address 

o 



, block address 



© 



decb name — symbol 

The decb name operand specifies the name assigned to the data event control 
block created as part of the macro expansion. 

type — {DA [F]} 

{DI [F]} 
[X] 

ff>K [F]} 
[X] 

The type operand is coded in one of the combinations shown to specify the type 
of write operation and optional services performed by the system. 



DA 



DI 



Specifies that a new data block is to be added to the data set in the first 
available space; the search for available space starts at the device address 
indicated in the area specified in the block address operand. The 
description of the DCB macro instruction, LIMCT operand, contains a 
description of the search. 

Specifies that a data block and key, if any, are to be written at the device 
address indicated in the area specified in the block address operand. Any 
attempt to write a capacity record (RO) is an invalid request when relative 
track addressing or actual device addressing are used, but when relative 
block addressing is used, relative block is the first data block in the data 
set. 
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DK 



Specifies that a data block (only) is to be written using the key in the area 
specified by the key address operand as a search argument; the search for 
the block starts at the device address indicated in the area specified in the 
block address operand. The description of the DCB macro instruction, 
LIMCT operand, contains a description of the search. 



Requests that the system provide block position feedback into the area 
specified in the block address operand. This character can be coded as a 
suffix to DA, DI, or DK as shown above. 

X 

Requests that the system release the exclusive control requested by a 
previous READ macro instruction and provide block position feedback into 
the area specified in the block address operand. This character can be 
coded as a suffix to DI or DK as shown above. 

deb address — A-Type Address or (2-12) 

The deb address operand specifies the address of the data control block for the 
opened BDAM data set. 

area address — A-Type Address, (2-12), or *S' 

The area address operand specifies the address of a main-storage area that 
contains the data block to be written. *S* can be coded instead of an area address 
only if the data block (or key and data) are contained in a buffer provided by 
dynamic buffering; that is, 'S' was coded in the area address operand of the 
associated READ macro instruction. If 'S' is coded in the WRITE macro 
instruction, the area address from the READ macro instruction data event control 
block must be moved into the WRITE macro instruction data event control block; 
the buffer area acquired by dynamic buffering is released after the WRITE macro 
instruction is executed. See Appendix A for a description of the data event 
control block. 

length — symbol, decimal digit, absexp, (2-12) or 'S' 

The length operand specifies the number of data bytes to be written up to a 
maximum of 32,760. If 'S' is coded, it specifies that the system uses the value in 
the blocksize (DCBBLKSI) field as the length. When undefined-length records 
are used, if the WRITE macro instruction is for update and the length specified 
differs from the original block, the new block will be truncated or padded with 
binary zeros accordingly. The problem program can check for this situation in the 
SYNAD routine. 

If the length operand is omitted for format-U records, no error indication is given 
when the program is assembled, but the problem program must insert a length 
into the data event control block before the WRITE macro instruction is 
executed. 

key address — A-Type Address, (2-12), 'S', or 

The key address operand specifies the address of the main-storage area that 
contains the key to be used. *S* is specified instead of an address only if the key 
is contained in an area acquired by dynamic buffering. If the key is not written 
or used as a search argument, zero is specified instead of a key address. 
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WRITE— BDAM 

block address— A-Tyipz Address or (2-12) 

The block address operand specifies the address of a main-storage area that 
contains the relative block address, relative track address, or actual device address 
used in the output operation. The length of the area depends on the type of 
addressing used and if the feedback option (OPTCD=F) is specified in the data 
control block. 

If OPTCD=F has been specified, feedback, when requested, is in the same form 
as was originally presented by the WRITE macro instruction; the area is either 
three or eight bytes long depending on the type of addressing. 

If OPTCD=F has not been specified, feedback, when requested, is in the form of 
an 8-byte actual device address (MBBCCHHR); the area must be eight bytes. 
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WRITE— BPAM andBSAM 



WRITE— Write a Block (BPAM and BSAM) 



The WRITE macro instruction causes the system to add or replace a block in a 
sequential or partitioned data set being created or updated. Control may be returned to 
the problem program before the block is written. The output operation must be tested 
for completion using the CHECK macro instruction. A data event control block, shown 
in Appendix A, is constructed as part of the macro expansion. 

If translation from EBCDIC code to ASCII code is requested, issuing multiple WRITE 
macro instructions for the same record causes an error because the first WRITE macro 
instruction issued causes the output data in the output buffer to be translated into 
ASCII code. 

If the OPEN macro instruction specifies UPDAT, both the READ and WRITE macro 
instructions must refer to the same data event control block. Refer to the list form of 
the READ or WRITE macro instruction for a description of how to construct a data 
event control block; refer to the execute form of the READ or WRITE macro 
instruction for a description of modifying an existing data event control block. 

The standard form of the WRITE macro instruction is written as follows (the list and 
execute forms are shown following the descriptions of the standard form): 



o 



rsymboll 


WRITE 


decb name ,rype, deb address, area address [", length 





decb name — symbol 

The decb name operand specifies the name assigned to the data event control 
block created as part of the macro expansion. 

type— SF 

This operand is coded as shown to specify the type of Write operation. 

SF Specifies normal, sequential forward operation. 

deb address — A-Type Address, or (2-12) 

The deb address operand specifies the address of the data control block for the 
opened data set being created or processed. If the data set is being updated, the 
data control block address must be the same as the deb address operand in the 
corresponding READ macro instruction. 

area address — A-Type Address or (2-12) 

The area address operand specifies the address of a main-storage area that 
contains the data block to be written; if a key is written, the key must precede the 
data in the same area. 
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length — symbol, decimal digit, absexp, (2-12) or 'S' §^\ 

The length operand specifies the number of bytes to be written; this operand is 
specified for only undefined-length records (RECFM=U) or ASCII records 
(RECFM=D) when the DCB BUFOFF operand is zero. If the data is to be 
translated from EBCDIC code to ASCII code, the maximum length is 2048; 
otherwise, the maximum length is 32,760 bytes. 'S' can be coded to indicate that 
the value specified in the blocksize (DCBBLKSI) field of the data control block is 
used as the length to be written. The length operand should be omitted for all 
record formats except format-U and format-D (when BUFOFF=0). 

If the length operand is omitted for format-U or format-D (with BUFOFF =0) 
records, no error indication is given when the program is assembled, but the 
problem program must insert a length into the data event control block before the 
data set is opened. 
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WRITE— BSAM 



WRITE— Write a Block (Create a BDAM Data Set with BSAM) 



The WRITE macro instruction causes the system to add a block to the direct data set 
being created. For fixed-length blocks, the system writes the capacity record 
automatically when the current track is filled; for variable- and unspecified-length 
blocks, a WRITE macro instruction must be issued for the capacity record. Control 
may be returned before the block is written. The output operation must be tested for 
completion using a CHECK macro instruction. A data event control block, shown in 
Appendix A, is constructed as part of the macro expansion. 

The standard form of the WRITE macro instruction is written as follows (the list and 
execute forms are shown following the descriptions of the standard form): 



[symbol] 


WRITE 


decb name, type, deb address, area address H length] Hnext address] 

L's* J 



© 



decb name — symbol 

The decb name operand specifies the name assigned to the data event control 
block created as part of the macro expansion. 

type — {SF } 
|SFR} 
{SD } 
ISZ } 

The type operand is coded as shown, to specify the type of write operation 
performed by the system. 



SF 



SFR 



SD 



SZ 



Specifies that a new data block is to be written in the data set. 

Specifies that a new variable-length spanned record is to be written in the 
data set, and next address feedback is requested. This operand can be 
specified only for variable-length spanned records (BFTEK=R and 
RECFM=VS are specified in the data set control block). 

Specifies that a dummy data block is to be written in the data set; dummy 
data blocks can be written only when fixed-length records with keys are 
used. 



Specifies that a capacity record (RO) is to be written in the data set; 
capacity records can be written only when variable-length or 
undefined-length records are used. 
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deb address — A-Type Address or (2-12) 

The deb address operand specifies the address of the data control block opened 
for the data set being created. DSORG=PS (or PSU) and MACRF=WL must be 
specified in the DCB macro instruction to create a BDAM data set. 

area address — A-Type Address or (2-12) 

The area address operand specifies the address of the main-storage area that 
contains the data block to be added to the data set. If keys are used, the key 
must precede the data in the same area. For writing capacity records (SZ), the 
area address is ignored and can be omitted (the system supplies the information 
for the capacity record). For writing dummy data blocks (SD), the area need be 
only large enough to hold the key plus one data byte. The system constructs a 
dummy key with the first byte set to all one bits (hexadecimal FF) and adds the 
block number in the first byte following the key. When a dummy block is 
written, a complete block is written from the area immediately following the area 
address; therefore, the area address plus the value specified in the BLKSIZE 
operand must be within the main-storage area allocated to the program writing 
the dummy blocks. 

length — symbol, decimal digit, absexp, (2-12), or *S' 

The length operand is used only when undefined-length (RECFM=U) blocks are 
being written. The operand specifies the length of the block, in bytes, up to a 
maximum of 32,760. If 'S' is coded, it specifies that the system is to use the 
length in the blocksize (DCBBLKSI) field of the data control block as the length 
of the block to be written. 

If the length operand is omitted for format-U records, no error indication is given 
when the program is assembled, but the problem program must insert a length 
into the data event control block before the data set is opened. 

next address — A-Type Address or (2-12) 

The next address operand specifies the address of a main-storage area where the 
system places the relative track address of the next record to be written. Next 
address feedback can be requested only when variable-length spanned records are 
used. 

Note: When variable-length spanned records are used (RECFM=VS and BFTEK=R 
are specified in the data control block), the system writes capacity records (R0) 
automatically in the following cases: 

• When a record spans a track. 

• When the record cannot be written completely on the current volume. In this 
case, all capacity records of remaining tracks on the current volume are written; 
tracks not written for this reason are still counted in the search limit specified in 
the LIMCT operand of the data control block. 

• When the record written is the last record on the track, the remaining space on 
the track cannot hold more than eight bytes of data. 
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Completion Codes 



After the write has been scheduled and control has been returned to the user's ^ 
program, the three high-order bytes of register 15 are set to zero; the low-order byte 
contains one of the following return codes: 

Code Meaning 

Fixed-Length 
(SF or SD) 



00 



04 



08 






0C 



Variable- or Unspecified-Length 
(SF or SFR) (SZ) 



Block will be written. (If the previous return code 
was 08, a block is written only if the DD 
statement specifies secondary space allocation 
and sufficient space is available. 



Capacity record was 
written; another track 
is available. 



Block will be written, 
followed by a capacity 
record. 



Block was not written; 
write a capacity record 
record (SZ) to complete 
the current track, then 
reissue. 



Block will be written, 
followed by capacity 
record. The next block 
requires secondary 
space allocation. 



Capacity record was 
written. The next 
block requires secondary 
space allocation. This 
code is not issued if 
the WRITE SZ is the 
only WRITE macro 
instruction issued on 
a one-track secondary 
extent. 

Block will not be written; issue a CHECK macro instruction for the previous 
WRITE macro instruction, then reissue the WRITE macro instruction. 



o 
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WRITE— BISAM 

WRITE— Write a Logical Record or Block of Records (BISAM) 

The WRITE macro instruction causes the system to add or replace a record or replace 
an updated block in an existing indexed sequential data set. Control may be returned to 
the problem program before the block or record is written. The output operation must 
be tested for completion using a WAIT or CHECK macro instruction. A data event 
control block, shown in Appendix A, is constructed as part of the macro expansion. 

The standard form of the WRITE macro instruction is written as follows (the list and 
execute forms are shown following the descriptions of the standard form): 



[symbol] 


WRITE 


decb name .type, deb addressJ area address* 
1 ^S* \'^ e y address 



o 



decb name — symbol 

The decb name operand specifies the name assigned to the data event control 
block created as part of the macro expansion. 

type — {K} {KN} 

The type operand is coded as shown to specify the type of write operation. 

K Specifies that either an updated unblocked record or a block containing an 
updated record is to be written. If the record has been read using a READ 
KU macro instruction, the data event control block for the READ macro 
instruction must be used as the data event control block for the WRITE 
macro instruction, using the execute form of the WRITE macro instruction. 

KN Specifies that a new record is to be written, or a variable-length record is to 
be rewritten with a different length. All records read using a READ KU 
macro instruction for the same data control block must be written back 
before a new record can be added except when the READ KU and WRITE ** 
KN refer to the same DECB. 

deb address — A-Type Address or (2-12) 

The deb address operand specifies the address of the data control block for the 
opened existing indexed sequential data set. If a block is written, the data control 
block address must be the same as the deb address operand in the corresponding 
READ macro instruction. 
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area address — A-Type Address, (2-12), or *S' 

The area address operand specifies the address of the main-storage area 
containing the record to be written. The first sixteen bytes of this area are used 
by the system and should not contain your data. When new records are written, 
the area address of the new record must always be supplied by the problem 
program. This area may be altered by the system. 4 S* may be coded instead of 
an address only if the record is contained in an area provided by dynamic 
buffering; that is, 'S' was coded for the area address operand in the associated 
| READ KU macro instruction. 

Indexed sequential buffer and work area requirements are discussed in OS Data 
Management Services Guide. 

length — symbol, decimal digit, absexp, (2-12) or *S' 

The length operand specifies the number of data bytes to be written, to a 
maximum of 32,760. If the length is already known to the system (if new records 
are being added or a block containing an updated record is written), specify *S' 
instead of a length. 

key address — A-Type Address or (2-12) 

The key address operand specifies the address of a main-storage area containing 
the key of the new or updated record. For blocked records, this is not necessarily 
the high key in the block. For unblocked records, this field should not overlap 
with the work area specified in the MSWA parameter of the DCB macro 
instruction. 






/" 



Note: When new records are written, this area may be altered by the system. V J 
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WRITE— List Form 



The list form of the WRITE macro instruction is used to construct a data management 
parameter list in the form of a data event control block (DECB). Refer to Appendix A 
for a description of the various fields in the DECB for each access method. 

The description of the standard form of the WRITE macro instruction provides the 
explanation of the function of each operand. The description of the standard form also 
indicates the operands used for each access method as well as the meaning of *S* when 
coded for the area address, length, and key address operands. For each access 
method, *S* can be coded only for those operands for which it can be coded in the 
standard form of the macro instruction. The format description below indicates the 
optional and required operands in the list form only. 

The list form of the WRITE macro instruction is written as follows: 



[symbol] 


WRITE 


decb name, type, [deb address], [area address], 

Ls 1 J 

|lengrh| ,[~key address], [block address], [next address] 

Ls- J L'S' J 

,MF=L 
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decb name — symbol 

type — Code one of the types shown in the standard form 

deb address — A-Type Address 

area address — A-Type Address or 'S' 

length — symbol, decimal digit, absexp, or 'S' 

key address — A-Type Address or 'S' 

block address — A-Type Address 

next address — A-Type Address 

MF=L — Coded as shown 

The MF-L operand specifies that the WRITE macro instruction is used to create 
a data event control block that will be referenced by an execute-form instruction. 



o 
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WRITE-Execute Form 



WRITE— Execute Form 



A remote data management parameter list (data event control block) is used in, and 
can be modified by, the execute form of the WRITE macro instruction. The data event 
control block can be generated by the list form of either a READ or WRITE macro 
instruction. 

The description of the standard form of the WRITE macro instruction provides the 
explanation of the function of each operand. The description of the standard form also 
indicates the operands used for each access method, as well as the meaning of *S' when 
coded for the area address, lengthy and key address operands. For each access 
method, 'S' can be coded only for those operands for which it can be coded in the 
standard form of the macro instruction. The format description below indicates the 
optional and required operands in the execute form only. 

The execute form of the WRITE macro instruction is written as follows: 



[symbol] 



WRITE 



decb address, type, (deb address], 



length 
,MF=E 



key address 



area address , 
, [block address], [next address] 
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decb address — RX-Type Address or (2-12) 

type — Code one of the types shown in the standard form 

deb address — RX-Type Address or (2-12) 

area address — RX-Type Address, (2-12), or *S» 

length — symbol, decimal digit, absexp, (2-12), or 4 S' 

key address — RX-Type Address, (2-12), or <S' 

block address — RX-Type Address or (2-12) 

next address — RX-Type Address or (2-12) 

MF=E — Coded as shown 

The MF=E operand specifies that the execute form of the WRITE macro 
instruction is used, and an existing data event control block (specified in the decb 
address operand) is to be used by the access method. 
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XLATE 



XLATE— Translate to and from ASCII (BSAM and QSAM) 



O 



The XLATE macro instruction is used to translate the data in an area in main storage 
from ASCII code to EBCDIC code or from EBCDIC code to ASCII code. 

The XLATE macro instruction is written as follows: 



[symbol] 


XLATE 


area address , length [,TO= 


A 
E 


] 



area address — RX-Type Address, symbol, decimal digit, absexp, or (2-12) 

The area address operand specifies the address of the main-storage area that is to 
be translated. 

length— symbol, decimal digit, absexp, or (2-12) 

The length operand specifies the number of bytes to be translated. 



TO = 



{A} 



The TO operand specifies the type of translation that is requested. The following 
describes the characters that can be specified. If this operand is omitted, E is 
assumed. 

A Specifies that translation from EBCDIC code to ASCII code is requested. 

E Specifies that translation from ASCII code to EBCDIC code is requested. 
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APPENDIX A: STATUS INFORMATION FOLLOWING AN 
INPUT/OUTPUT OPERATION 

Following an input/output operation, the control program makes certain status 
information available to the problem program. This information is a 2-byte exception 
code, or a 16-byte field of standard status indicators, or both. 

Exception codes are provided in the data control block (QISAM), or in the data event 
control block (BIS AM and BDAM). The data event control block is described below, 
and the exception code lies within the block as shown in the illustration for the data 
event control block. If a DCBD macro instruction is coded, the exception code in a 
data control block can be addressed as two 1-byte fields, DCBEXCD1 and 
DCBEXCD2. The exception codes can be interpreted by referring to Figures 1-3. 

Status indicators are available only to the error analysis routine designated by the 
SYNAD entry in the data control block. A pointer to the status indicators is provided 
either in the data event control block (BSAM, BPAM, and BDAM), or in register 
(QISAM and QSAM). The contents of registers on entry to the SYNAD routine are 
shown in Figures 4-6; the status indicators are shown in Figure 7. 

The Data Event Control Block 

A data event control block is constructed as part of the expansion of READ and 
WRITE macro instructions and is used to pass parameters to the control program, help 
control the read or write operation, and receive indications of the success or failure of 
the operation. The data event control block is named by the READ or WRITE macro 
instruction, begins on a fullword boundary, and contains the information shown in the 
following illustration: 







Field Contents 






Offset From DECB 








Addre: 


ss (Bytes) 


BSAM and BPAM 


BISAM 


BDAM 







ECB 


ECB 


ECB 1 


+4 




Type 


Type 


Type 


+6 




Length 


Length 


Length 


+8 




DCB address 


DCB address 


DCB address 


+12 




Area address 


Area address 


Area address 


+16 




Status indicator 


Logical record 


Status indicator 






address 


address 


address 


+20 






Key address 


Key address 


+24 






Exception code 
(2 bytes) 


Block address 


+28 








Next address 



Exception codes are returned in the second and third bytes of the ECB by the control program. 
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The Event Control Block \J 

The event control block (ECB) is used by the control program to test for completion of 
the read or write operation. The type, length, data control block address, area address, 
key address, block address, and next address information is taken from the operands of 
the macro instruction for use by the control program. Exception codes are returned by 
the control program after the corresponding WAIT or CHECK macro instruction is 
issued, as indicated in Figure 1 ; for BD AM, BSAM, and BPAM the control program 
provides a pointer to status indicators shown in Figure 7. 



Exception 
Code Bit 


READ 


WRITE 


Condition if On 





X 


Type K 


Record not found 


1 


X 


X 


Record length check 


2 




Type KN 


Space not found 


3 




TypeK 


Invalid request 


4 


X 


X 


Uncorrectable I/O 
error 


5 


X 


X 


Unreachable block 


6 


X 




Overflow record 


7 




Type KN 


Duplicate record 


8-15 






8-1 5 reserved for 
control program use 



Figure 1. Exception Code Bit 




Notes for Figure 1: 

Record Not Found: This condition is reported if the logical record with the specified key 
is not found in the data set, if the specified key is higher than the highest key in the 
highest level index, or if the record is not in either the prime area or the overflow area 
of the data set. 

Record Length Check: This condition is reported, for READ and update WRITE 
macro instructions, if an overriding length is specified and (1) the record format is 
blocked, (2) the record format is unblocked but the overriding length is greater than 
the length known to the control program, or (3) the record is fixed length and the 
overriding length does not agree with the length known to the control program. This 
condition is reported for the add WRITE macro instruction if an overriding length is 
specified. 

When blocked records are being updated, the control program must find the high key in 
the block in order to write the block. (The high key is not necessarily the same as the 
key supplied by the problem program.) The high key is needed for writing because the 
control unit for direct-access devices permits writing only if a search on equal is 
satisfied; this search can be satisfied only with the high key in the block. If the user 
were permitted to specify an overriding length shorter than the block length, the high 
key might not be read; then, a subsequent write request could not be satisfied. In 
addition, failure to write a high key during update would make a subsequent update 
impossible. 
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Space Not Found in Which to Add a Record: This condition is reported if no room exists 
in either the appropriate cylinder overflow area or the independent overflow area when 
a new record is to be added to the data set. The data set is not changed in any way in 
this situation. 

Invalid Request: This condition is reported for either of two reasons. First, if byte 25 
of the data event control block indicates that this request is an update WRITE macro 
instruction corresponding to a READ (for update) macro instruction, but the 
input/output block (IOB) for the READ is not found in the update queue. This 
condition could be caused by the problem program altering the contents of byte 25 of 
the data event control block. Second, if a READ or WRITE macro instruction 
specifies dynamic buffering (that is, 'S' in the area address operand) but the 
DCBMACRF field of the data control block does not specify dynamic buffering. 

Uncorrectable Input/Output Error: This condition is reported if the control program's 
error recovery procedures encounter an uncorrectable error in transferring data 
between main storage and secondary storage. 

Unreachable Block: This condition is reported if an uncorrectable input/output error 
occurs while searching the indexes or following an overflow chain. It is also posted if 
the data field of an index record contains an improper address (that is, points to the 
wrong cylinder or track or is an invalid address). 

Overflow Record: This condition is reported if the record just read is an overflow 
record. (See the section on direct retrieval and update cf an indexed sequential data 
set in OS Data Management Services Guide for consideration during BISAM 
updating.) 

Duplicate Record Presented for Inclusion in the Data Set: This condition is reported if 
the new record to be added has the same key as a record in the data set. However, if 
the delete option was specified and the record in the data set is marked for deletion, 
this condition is not reported. Instead the new record replaces the existing record. 

If the record format is blocked and the relative key position is zero, the new record 
cannot replace an existing record that is of equal key and is marked for deletion. 
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Exception Code 


Code Set by 








Field 


Bit 


CLOSE 


GET 


PUT 


PUTX 


SETL 


DCBEXCD1 



1 
2 
3 
4 




X 


X 




TypeK 
Type I 

X 




5 


X 




X 


X 






6 




X 






X 




7 


X 


X 








DCBEXCD2 



1 
2 

3 
4 
5-7 


X 


X 


X 
X 

X 







Condition if On 

Record Not Found 

Invalid actual address for lower limit 

Space not found in which to add a record 

Invalid request 

Uncorrectable input error 

Uncorrectable output error 

Block could not be reached (input) 

Block could not be reached (update) 

Sequence check 

Duplicate record 

Data control block closed when error routine 
entered 

Overflow record 1 

Incorrect record length 

Reserved for future use 






1 The SYNAD routine is entered only if bit 4, 5, 6, or 7 of DCBEXCD1 is also on. 

Figure 2. Exception Code Bits-^-QISAMJ 



Notes for Figure 2: 

Record Not Found: This condition is reported if the logical record with the specified key 
is not found in the data set, if the specified key is higher than the highest key in the 
highest level index, or if the record is not in either the prime area or the overflow area 
of the data set. 

Invalid Actual Address for Lower Limit: This condition is reported if the specified lower 
limit address is outside the space allocated to the data set. 

Space Not Found in Which to Add a Record: This condition is reported if the space 
allocated to the data set is already filled. In the locate mode, a buffer segment address 
is not provided. In the move mode, data is not moved. 

Invalid Request: This condition is reported if (1) the data set is already being referred 
to sequentially by the problem program, (2) the buffer cannot contain the key and the 
data, or (3) the specified type is not also specified in the DCBMACRF field of the 
data control block. 

Uncorrectable Input Error: This condition is reported if the control program's error 
recovery procedures encounter an uncorrectable error when transferring a block from 
secondary storage to an input buffer. The buffer address is placed in register 1, and the 
SYNAD routine is given control when a GET macro instruction is issued for the first 
logical record. 

Uncorrectable Output Error: This condition is reported if the control program's error 
recovery procedures encounter an uncorrectable error when transferring a block from 
an output buffer to secondary storage. If the error is encountered during closing of the 
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data control block, bit 2 of DCBEXCD2 is set to 1 and the SYNAD routine is given 
control immediately. Otherwise, control program action depends on whether load mode 
or scan mode is being used. 

If a data set is being created (load mode), the SYNAD routine is given control when 
the next PUT or CLOSE macro instruction is issued. In the case of a failure to write a 
data block, register 1 contains the address of the output buffer, and register contains 
the address of a work area containing the first 16 bytes of the IOB; for other errors, 
the contents of register 1 are meaningless. After appropriate analysis, the SYNAD 
routine should close the data set or end the job step. If records are to be subsequently 
added to the data set using the queued indexed sequential access method (QISAM), the 
job step should be terminated by issuing an ABEND macro instruction. (ABEND 
closes all open data sets. However, an ISAM data set is only partially closed, and it 
can be reopened in a later job to add additional records by using QISAM). Subsequent 
execution of a PUT macro instruction would cause reentry to the SYNAD routine, 
since an attempt to continue loading the data set would produce unpredictable results. 

If a data set is being processed (scan mode), the address of the output buffer in error is 
placed in register 1, the address of a work area containing the first 16 bytes of the IOB 
is placed in register 0, and the SYNAD routine is given control when the next GET 
macro instruction is issued. Buffer scheduling is suspended until the next GET macro 
instruction is reissued. 

Block Could Not be Reached (Input): This condition is reported if the control program's 
error recovery procedures encounter an uncorrectable error in searching an index or 
overflow chain. The SYNAD routine is given control when a GET macro instruction is 
issued for the first logical record of the unreachable block. 

Block Could Not be Reached (Output): This condition is reported if the control 
program's error recovery procedures encounter an uncorrectable error in searching an 
index or overflow chain. 

If the error is encountered during closing of the data control block, bit 2 of 
DCBEXCD2 is set to 1 and the SYNAD routine is given control immediately. 
Otherwise, the SYNAD routine is given control when the next GET macro instruction 
is issued. 

Sequence Check: This condition is reported if a PUT macro instruction refers to a 
record whose key has a smaller numerical value than the key of the record previously 
referred to by a PUT macro instruction. The SYNAD routine is given control 
immediately; the record is not transferred to secondary storage. 

Duplicate Record: This condition is reported if a PUT macro instruction refers to a 
record whose key duplicates that of the record previously referred to by a PUT macro 
instruction. The SYNAD routine is given control immediately; the record is not 
transferred to secondary storage. 

Data Control Block Closed When Error Routine Entered: This condition is reported if 
the control program's error recovery procedures encounter an uncorrectable output 
error during closing of the data control block. Bit 5 or 7 of DCBEXCD1 is set to 1, 
and the SYNAD routine is immediately given control. After appropriate analysis, the 
SYNAD routine must branch to the address in return register 14 so that the control 
program can finish closing the data control block. 

Overflow Record: This condition is reported if the input record is an overflow record. 
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Incorrect Record Length: This condition is reported if the length of the record as 
specified in the record-descriptor word (RDW) is larger than the value in the 
DCBLRECL field of the data control block. 



Exception 
Code Bit 


READ 


WRITE 


Condition if On 





X 


X 


Record not found 


1 


X 


X 


Record length check 


2 




X 


Space not found 


3 


X 


X 


Invalid request — see bits 9-15 


4 


X 


X 


Uncorrectable I/O error 


5 


X 


X 


End of data 


6 


X 


X 


Uncorrectable error 


7 




TypeX 


Not read with exclusive control 


8 






Not used 


9 




X 


WRITE to input data set 


10 


X 


X 


Extended search with DCBLIMCT=0 


11 


X 


X 


Block or track requested was outside data set 


12 




X 


Tried to write capacity record 


13 


X 


X 


Specified key as search argument when KEYLEN=0 or no 
key address supplied 


14 


X 


X 


Request for options not in data control block 


15 




X 


Attempt to add fixed-length record with key beginning 



with hexadecimal FF 



Figure 3. Exception Code Bits— /BD AM 




Notes for Figure 3: 

Record Not Found; This condition is reported if the search argument is not found in 
the data set. 

Record Length Check: This condition occurs for READ and WRITE (update) and 
WRITE (add). For WRITE (update) variable-length records only, the length in the 
BDW does not match the length of the record to be updated. For all remaining READ 
and WRITE (update) conditions the BLKSIZE, when *SP is specified in the READ or 
WRITE macro, or the length given with these macros does not agree with the actual 
length of the record. For WRITE (add), fixed-length records, the BLKSIZE, when 'S' 
is specified in the WRITE macro, or the length given with this macro does not agree 
with the actual length of the record. For WRITE (add), all other conditions, no error 
can occur. 

Space Not Found in Which to Add a Record: This condition occurs if either there is no 
dummy record when adding an F-format record, or there is no space available when 
adding a V or U-format record. 
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Invalid Request: Occurs whenever one of the following bits are set to one: 

Bit 9 — A WRITE was attempted for an input data set. 

Bit 10 — An extended search was requested, but LIMCT was zero. 

Bit 11 — A WRITE (add) with fixed-length was attempted with the key 

beginning with X'FF\ 
Bit 12 — Writing a capacity record(RO) was attempted. 
Bit 13 — A READ or WRITE with key was attempted, but either KEYLEN 

equaled zero or the key address was not supplied. 
Bit 14 — The READ or WRITE macro options conflict with the OPTCD or 

MACRF parameters. 
Bit 15 — The relative block or relative track requested was not in the data 

set. 

Uncorrectable Input/Output Error: This condition is reported if the control program's 
error recovery procedures encounter an uncorrectable error in transferring data 
between real and secondary storage. 

End of Data: This only occurs as a result of a READ (type DI, DIF, or DIX) when the 
record requested is an end-of-data record. 

Uncorrectable error: Same conditions as for bit 4. 

Not Read With Exclusive Control: A WRITE, type DIX or DKX, has occurred for 
which there is no previous corresponding READ with exclusive control. 



o 



Register Bits Meaning 

0-7 Not used. 

8-31 Address of a work area containing the first 16 bytes of the IOB (after an 
uncorrectable input/output error caused by a GET, PUT, or PUTX macro 
instruction; original contents destroyed in other cases). If the error condition was 
detected before I/O was started, register contains all zeros. 

1 0-7 Not used. 

8-31 Address of the buffer containing the error record (after an uncorrectable 

input/output error caused by a GET, PUT, or PUTX macro instruction while 
attempting to read or write a data record; in other cases this register contains 0). 



2-13 
14 



15 



0-31 Contents that existed before the macro instruction was issued. 

0-7 Not used. 

8-31 Return address. This address is either an address in the control program's Close 
routine (bit 2 of DCBEXCD2 is on), or the address of the instruction following the 
expansion of the macro instruction that caused the SYNAD routine to be given 
control (bit 2 of DCBEXCD2 is off). 

0-7 Not used. 

8-31 Address of the SYNAD routine. 



Figure 4. Register Contents on Entry to SYNAD Routine — QISAM 
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Register Bits Meaning if^\ 

0-7 Not used. V-^ 

8-31 Address of the first I OB sense byte. (Sense information is valid only when 
associated with a unit check condition.) 

1 0-7 Not used. 

8-31 Address of the DECB. 
2-13 0-31 Contents that existed before the macro instruction was issued. 

14 0-7 Not used. 
8-31 Return address. 

15 0-7 Not used. 

8-31 Address of the SYN AD routine. 

Figures. Register Contents on Entry to SYNAD Routine— BISAM 

Register Bits Meaning 

0-7 Value to be added to the status indicators address to provide the address of the 

first CCW (QSAM only). 
8-31 Address of the associated data event control block for BDAM, BPAM/and BSAM; 
address of the status indicators shown in Figure 7 for QSAM. 

1 Bit is on for error caused by input operation. 

1 Bit is on for error caused by output operation. 

2 Bit is on for error caused by BSP, CNTRL, or POINT macro instruction (BPAM 

AND BSAM only). -^ 

3 Bit is on if error occurred during update of existing record or if error did not ( 
prevent reading of the record. Bit is off if error occurred during creation of a new \_ - 
record or if error prevented reading of the record. 

4 Bit is on if the request was invalid. The status indicators pointed to in the data 
event control block are not present (BDAM, BPAM, and BSAM only). 

5 Bit is on if an invalid character was found in paper tape conversion (BSAM and 
QSAM only). 

6 Bit is on for a hardware error (BDAM only). 

7 Bit is on if no space was found for the record (BDAM only). 
8-31 Address of the associated data control block. 

2-13 0-31 Contents that existed before the macro instruction was issued. 

14 0-7 Not used. * 
8-31 Return address. 

15 0-7 Not used. 

8-31 Address of the error analysis routine. * 

Figure 6. Register Contents on Entry to SYNAD Routine — BDAM, BPAM, BSAM, 
and QSAM " ~ 
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Offset From Status 
Indicator Address 
Byte Bit 



+2 



+3 

+8 
+9 
+ 12 



+13 



© 




1 
2 
3 
4 
5 



S) | 



0-7 




1 
2 
3 
4 
5 
6 




1 
2 
3 
4 
5 
6 
7 



+ 14 



Meaning 

Command reject 

Intervention required 

Bus-out check 

Equipment check 

Data check 

Overrun 

Device-dependent 

Refer to the appropriate device 

manual 

Beginning of a channel status word 

Command address 

Attention 

Status modifier 

Control unit end 

Busy 

Channel end 

Device end 

Unit check — must be on for 

sense bytes to be meaningful 

Unit exception 

Program-controlled interrupt 
Incorrect length 
Program check 
Protection check 
Channel data check 
Channel control check 
Interface control check 
Chaining check 

Count field 



Name 



Sense byte 1 



Sense byte 2 



Status byte 1 
(Unit) 



Status byte 2 
(Channel) 



channel 
>- status 
word 



Figure 7. Status Indicators for the SY NAD Routine - 
QSAM 



-BDAM, BPAM, BSAM, and 
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APPENDIX B: DATA MANAGEMENT MACRO INSTRUCTIONS 
AVAILABLE BY ACCESS METHOD 



O 



Macro Instruction 


BDAM 


BISAM 


BPAM 


BSAM 


QISAM 


a 


BLDL 






X 








BSP 








X 






BUILD 


X 


X 


X 


X 


X 


X 


BUILDRCD 












X 


CHECK 


X 


X 


X 


X 






CHKPT 


X 


X 


X 


X 


X 


X 


CLOSE 


X 


X 


X 


X 


X 


X 


CNTRL 








X 




X 


DCB 


X 


X 


X 


X 


X 


X 


DCBD 


X 


X 


X 


X 


X 


X 


ESETL 










X 




FEOV 








X 




X 


FIND 






X 








FREEBUF 


X 


X 


X 


X 






FREEDBUF 


X 


X 










FREEPOOL 


X 


X 


X 


X 


X 


X 


GET 










X 


X 


GETBUF 


X 


X 


X 


X 






GETPOOL 


X 


X 


X 


X 


X 


X 


NOTE 






X 


X 






OPEN 


X 


X 


X 


X 


X 


X 


POINT 






X 


X 






PRTOV 








X 




X 


PUT 










X 


X 


PUTX 










X 


X 


READ 


X 


X 


X 


X 






RELEX 


X 












RELSE 










X 


X 


SETL 










X 




SETPRT 








X 




X 


STOW 






X 








SYNADAF 


X 


X 


X 


X 


X 


X 


SYNADRLS 


X 


X 


X 


X 


X 


X 


TRUNC 












X 


WAIT 


X 


X 


X 


X 






WRITE 


X 


X 


X 


X 







QSAM 



XLATE 
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APPENDIX C: DEVICE CAPACITIES 

The following information provides a guide to coding the blocksize (BLKSIZE) and 
logical record length (LRECL) operands in the DCB macro instruction. These values 
can be used to determine the maximum blocksize and logical record length for a given 
device, and they can be used to determine the optimum blocking factor when records 
are to be blocked. 

Card Readers and Card Punches 

The logical-record length for a card reader or card punch is fixed at 80 bytes; 
variable-length records are not supported for these devices. If the optional control 
character is specified, the logical-record length is 81 (the control character is not part 
of the data record). If card image mode is used, the buffer required to contain the data 
must be 160 bytes. 



Printers 



o 



The following shows the record length that can be specified for the various printers. In 
some cases, two values are shown; the larger of the two values requires that an optional 
feature be installed on the printer being used. If the optional control character is 
specified to control spacing and skipping, the record length is specified as one greater 
than the actual data length (the control character is not part of the data record). 

1403 printer — 120 or 132 bytes 

1404 printer — 120 or 132 bytes 
1443 printer — 120 or 144 bytes 
3211 printer — 132 or 150 bytes 
1052 printer keyboard — 130 bytes 
3210 printer keyboard — 130 bytes 

3215 printer keyboard — - 130 bytes 
3525 card punch, 

printfeature ■-.;""■-■ — 64 bytes 



Paper-Tape Reader 

2671 paper tape— 32,760 bytes 

Magnetic-Tape Units 

2400/3400 magnetic-tape units— 32,760 
(7 tracks and 9 tracks) 
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Direct-Access Devices 

The following chart shows the capacity of direct-access devices by track, cylinder, and 
total capacity in bytes. 






Device 


Volume 


Maximum Block- 


Tracks/ 


Number of 


Total 


Type 


Type 


size/Track 1 


Cylinder 


Cylinders 2 


Capacity 1 ' 2 


2301 


Drum 


20483 


8 


25 


4,096,600 


2302 


Disk 


4984 


46 


246 


56,398,944 


2303 


Drum 


4892 


10 


80 


3,913,600 


2305-1 


Drum 


14136 


8 


48 


5,428,224 


2305-2 


Drum 


14660 


8 


96 


11,258,880 


2311 


Disk 


3625 


10 


200 


7,250,000 


2314/2319 


Disk 


7294 


20 


200 


29,176,000 


2321 


Data 
Cell 


2000 


20 


980 3 


39,200,000 


3330/3333 


Disk 


13030 


19 


404 


100,018,280 



Capacity indicated in bytes (when RO is used by the IBM programming system). 



2 Excluding alternate cylinders. 

3 A volume is equal to one bin in a 2321 Data Cell. 



Each record written on a direct-access device requires some "device overhead." The 
term device overhead means the space required by the device for address markers, 
count areas, gaps between the count, key, and data areas, and gaps between blocks. 
The following formulas can be used to compute the number of bytes required for each 
data block including the space required for device overhead. Note that any fraction of 
a byte must be ignored. For example, if the formula computation results in 15.644 
bytes, 15 bytes must be used to determine track capacity. 







Bytes Required by Each Data Block 






Device 


Track 


Blocks With Keys 




Blocks Without Keys 




Type 


Capacity 


Bi 


Bn 


Bi 


Bn 


2301 


20483 


186+KL+DL 


53+KL+DL 


133+DL 


DL 


2302 


4984 


81+(KL+DL)537/512 


20+KL+DL 


61+(DL)537/512 


DL 


2303 


4892 


146+KL+DL 


38+KL+DL 


108+DL 


DL 


2305-1 


14568 1 


634+KL+DL 


634+KL+DL 


432+DL 


432+DL 


2305-2 


14858 1 


289+KL+DL 


289+KL+DL 


198+DL 


198+DL 


2311 


3625 


81+(KL+DL)537/512 


20+KL+DL 


61+(DL)537/512 


DL 


2314/2319 


7294 


146+(KL+DL)534/512 


45+KL+DL 


101+(DL)534/512 


DL 


2321 


2000 


100+(KL+DL)537/512 


16+KL+DL 


84+(DL)537/512 


DL 


3330/3333 


13165 1 


191+KL+DL 


191+KL+DL 


135+DL 


135+DL 



V 



Bi is any block but the last on the track. 
Bn is the last block on the track. 
DL is data length. 
KL is key length. 

1 This value is different from the maximum blocksize per track because the formula for the 
last block on the track includes an overhead for this device. 

When the track overflow feature is being used or variable-length spanned records are 
written, the size of a data block or logical record can exceed the capacity of a single 
track on the direct-access device used. 
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APPENDIX D: DC^XTT LIST>ORMAT AND CONTENTS 

The f oUoSSSlhSwTthe format and contents that must be supplied by the problem 
program when the EXLST operand is specified in a DCB macro instruction. The exit 
list must begin on a fullword boundary and each entry in the list requires one fullword. 

Hexadecimal 

Code 3-Byte Routine Address — Purpose 

00 Ignored; the entry is not active. 

01 Process a user input header label. 

02 Create a user output header label. 

03 Process a user input trailer label. 

04 Create a user output trailer label. 

05 Data control block exit routine. 

06 End-of -volume exit routine. 
0A Pointer to user's totaling area. 
0B Block count unequal exit routine. 
0C Defer processing of a user input trailer label 

from the end-of-data until the CLOSE macro 
instruction is issued. 
0D Defer processing a nonstandard input trailer 

label on magnetic tape unit from the end-of- 
data until the CLOSE macro instruction is 
issued (no exit routine address). 

10 Define an FCB image. 

1 1 Allow analysis of ABEND condition and select 
one of several options. 

80 Last entry in list. A high-order bit can be 

specified with any of the above codes but must 
vs be specified with the last entry. 



Routine Type 

Inactive entry 
Input header label 
Output header label 
Input trailer label 
Output trailer label 
Data control block exit 
End-of-volume 
User totaling 
Block count exit 
Defer input trailer 
label 

Defer nonstandard 
input trailer label 



FCB Image 
DCB ABEND exit 

Last entry 



67 A>VAS$\ of Wi> &H*?6Pv 

The list can be dynamically shortened during execution by setting the high-order bit of 
a word to a value of 1. An entry in the list can be made inactive dynamically by 
setting the high-order byte of the word to a value of hexadecimal 00. 
When control is passed to an exit routine, the general registers contain the following 
information: 



Register 


1 



2-13 

14 

15 



Contents 

Variable; the contents depend on the exit routine used. 

The three low-order bytes contain either the address of the DCB 

currently being processed or, when certain exits are taken, the 

address of the exit parameter list. These exits are: user-label 

exits (X'Ol'-W), deferred nonstandard input trailer exit 

(XW), and DCB ABEND exit (X'l 1'). 

Contents prior to execution of the macro instruction. 

Return address (must not be altered by the exit routine). 

Address of the exit routine entry point. 
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The conventions for saving and restoring registers are as follows: 

• The exit routine must preserve the contents of register 14 It nee d not preserve 
the contents of other registers. The control program restores registers 2-13 
before returning control to the problem program. 

• The exit routine must not use the save area w fonse address is in r egister 13, 
because this area is used by the control program. If the exit routine calls another 
routine or issues supervisor or data management macro instructions, it must 
provide the address of a new save area in register 13. 

For a detailed description of each exit list processing option, refer to OS Data 
Management Services Guide. 
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APPENDIX E: CONTROL CHARACTERS 



Each logical record, in all record formats, can contain an optional control character. 
This control character is used to control stacker selection on a card punch or card read 
punch, or it is used to control printer spacing and skipping. If a record containing an 
optional control character is directed to any other device, it is considered to be the first 
data byte, and it does not cause a control function to occur. 

In format-F and format-U records, the optional control character must be in the first 
byte of the logical record. 

In f ormat-V records, the optional control character must be in the fifth byte of the 
logical record, immediately following the block descriptor word of the record. 

Two control character options are available. A control character option is selected by 
coding the appropriate character in the RECFM operand of the DCB macro 
instruction. If either option is specified in the data control block, a control character 
must be included in each record, and other spacing or stacker selection options also 
specified in the data control block are ignored. 



Machine Code 
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The record format field in the data control block indicates that the machine code 
control character has been placed in each logical record. If the record is written, the 
appropriate byte must contain the command code bit configuration specifying both the 
write and the desired carriage or stacker select operation. If the record is not written, 
the byte can specify any command other than write. 

Command codes for specific devices are contained in IBM System Reference Library 
publications describing the control units or devices. 

American National Standards Institute Control Characters 

In place of machine code, control characters defined by the American National 
Standards Institute (ANSI) can be specified. These characters must be represented in 
EBCDIC code. 
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American National Standards Institute control characters (ANSI) are as follows: 4 ■ ; 

Code Action Before Printing a Line 



b 


Space one line (blank code) 





Space two lines 


- 


Space three lines 


+ 


Suppress space 


1 


Skip to channel 1 


2 


Skip to channel 2 


3 


Skip to channel 3 


4 


Skip to channel 4 


5 


Skip to channel 5 


6 


Skip to channel 6 


7 


Skip to channel 7 


8 


Skip to channel 8 


9 


Skip to channel 9 


A 


Skip to channel 10 


B 


Skip to channel 1 1 


C 


Skip to channel 12 


V 


Select punch pocket 1 


w 


Select punch pocket 2 



These control characters include those defined by ANSI FORTRAN. If any other 
character is specified, it is interpreted as 'b' or V, depending on the device being used; 
no error indication is returned. 
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INDEX 



Indexes to Systems Reference Library 
publications are consolidated in OS 
Master Index to Reference Manuals, 
GC28-6644. For additional 
information about any subject listed 
below, refer to other publications 
listed for the same subject in the 
master index. 



A-type address defined 4 
ABEND exit, DCB 
BDAM 45 
BISAM 53 
BPAM 60 
BSAM 76 
list format 227 
QISAM 86 
QSAM 104 
absexp defined 4 
absolute expression defined 4 
access methods 
DCB for 

BDAM 41-50 
BISAM 51-56 
BPAM 57-63 
BSAM 65-82 
QISAM 83-91 
QSAM 93-109 
DCBD options 111-112 
macro instructions available 
by 223 
actual device addressing 
(BDAM) 41,48 
add data to a data set 
BDAM 47,195 
BISAM 54,205 
BPAM 181,199 
BSAM 199 
QISAM 147 
QSAM 149 
address 

A-type defined 4 
RX-type defined 3 
address feedback 

current block position 1 5 3 , 1 97 
next block position 1 54, 197,202 
address of buffers 

obtained from a pool 129 
returned to a pool 1 1 9 
addressing, types of (BDAM) 47-48 
aids, coding 1-2 

alias names in a directory 1 8 1 - 1 82 
alignment of buffers 
BDAM 42 
BISAM 51 
BPAM 58 
BSAM 65-66 
QISAM 84 
QSAM 93-94 



allocating space for a data set 
BPAM 57 
ISAM 83 
American National Standards Institute 
(ANSI) control characters 
BPAM 63 
BSAM 80 
defined 229-230 
QSAM 108 
analysis of I/O errors 
BDAM 49-50,213,218 
BISAM 56,213-215 
BPAM 63,213,220,221 
BSAM 81-82,213,220,221 
QISAM 91,213,216-219 
QSAM 109,213,220,221 
SYNADAF 185,213-221 
ANSI (see American National 

Standards Institute) 
argument, search 
BDAM 47 
QISAM 88 
ASCII data sets 
block prefix 
BSAM 68 
QSAM 95 
restriction 93 
blocksize 
BSAM 68 
QSAM 95 
buffer length 
BSAM 67 
QSAM 96 
on paper tape 
BSAM 81 
QSAM 109 
restriction on record format 
BSAM 81 
QSAM 109 
ASCII translation 
Check routine 21 
DCB option 
BSAM 79 
QSAM 107 
Get routine 127 
Put routine 149 
Write routine 199 
XL ATE macro instruction 21 1 
associated data sets (3525) 
closing 31 
opening 135 
type of 

BSAM 72-75 
QSAM 100-103 
automatic buffer pool construction 
BDAM 41,43 
BISAM 51,52 
BPAM 57,59 
BSAM 65,67 
QISAM 85 



QSAM 93,96 
automatic volume switching 
(FEOV) 115 

B 

backspacing 
BSP 11 
CNTRL 37-39 
backward read 

Open option 136 
Read operation 1 6 1 
base registers for 

dummy sections 111 
macro instructions 4 
BCD 8-track paper tape code 
BSAM 71 
QSAM 99 
BDAM (basic direct access method) 
general description 41 
macro instructions available 
for 223 
BFALN operand 
BDAM 42 
BISAM 51 
BPAM 58 
BSAM 65-66 
QISAM 84 
QSAM 93-94 
BFTEK operand 
BDAM 42 
BSAM 66 
QSAM 94 
BISAM (basic indexed sequential 
access method) 
general description 5 1 
macro instructions available 
for 223 
BLDL macro instruction 
description 9-10 
used with FIND 117 
BLKSIZE operand 
BDAM 43 
BPAM 58 
BSAM 66 
QISAM 84 
QSAM 94-95 
block 

backspacing by 37 
count exit 
BSAM 76 
list format 227-228 
QSAM 104 
data control 41-109 
data event control 213 
description word (see BLKSIZE 

operand) 
event control 213 
position feedback 153-154,197,202 
positioning with POINT 143-144 
prefix 
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(see also BUFOFF operand) 


FREEDBUF 121 


c 




effect on buffer length 67,96 


FREEPOOL 123 




effect on data alignment 65,93 


RELSE 169 


card 


rv 


reading of 153-157 


SYNADRLS 189 


code 


;U ■ 


size of (see BLKSIZE operand) 


truncate 191 


BSAM 72-75 




standard 109 


buffering, types of 


QSAM 100-103 




writing of 195-201 


dynamic 121 


image mode 




blocking 


exchange 94 


defined 72,100 




records 


problem program controlled 


buffer length required 67,96 




BDAM 41,49 


BDAM 44 


punch 72-75,100-103 




BPAM 57,63 


BISAM 52 


reader 72-75,100-103 




BSAM 65,81 


BPAM 59 


carriage 




QISAM 83,90,147 


BSAM 68 


control channel 




QSAM 93,108,149 


simple 94 


CNTRL 37-39 




blocksize 


variable-length spanned record 


PRTOV 145-146 




(see also BLKSIZE operand) 


BDAM 44 


control characters 




for SYSOUT data sets 


BUILDRCD 15-16 


ANSI 229-230 




BSAM 66-67 


QSAM 94 


CNTRL 37-39 




QSAM 94-95 


BUFL operand 


machine 229 


'<# 


BOLD type, meaning of 2 


BDAM 43 


PRTOV 145-146 




boundary alignment (see BFALN 


BISAM 52 


change partitioned data set member 




operand) 


BPAM 59 


name 182 




BPAM (basic partitioned access 


BSAM 67 


chained scheduling option 


♦ 


method) 


QISAM 85 


BPAM 62 




general description 59 


QSAM 96 


BSAM 78-79 




macro instructions available 


BUFNO operand 


QSAM 107-108 




for 223 


BDAM 44 


channel 




BSAM (basic sequential access 


BISAM 52 


carriage control (see carriage 




method) 


BPAM 59 


control channel) 




general description 65 


BSAM 68 


overflow 145-146 




macro instructions available 


QISAM 85 


programs, number of 




for 223 


QSAM 96 


BISAM 55 




BSP macro instruction 1 1 


relationship to NCP operand 55 


BPAM 62 




BUFCB operand 


BUFOFF operand 


BSAM 78 


BDAM 43 


BSAM 68 


CHECK macro instruction 


BISAM 52 


QSAM 96 


description 21 




BPAM 59 


BUILD macro instruction 


relation to 




BSAM 67 


description 13 


end of data (EODAD) 60,76 




QISAM 85 


relationship to 


number of Read and Write 




QSAM 95 


buffer length (see BUFL 


operations (NCP) 55,62,78 




relationship to 


operand) 


return of exception codes 213 




GETBUF 129 


buffer pool control block (see 


with READ 153-162 




GETPOOL 131 


BUFCB operand) 


with WRITE 195-206 




buffer 


number of buffers (see BUFNO 


checking, write-validity 




alignment (see BFALN operand) 


operand) 


BDAM 48 




dynamic 


BUILDRCD 


BPAM 62 




FREEBUF 119 


description 


BSAM 79 




FREEDBUF 121 


execute form 19 


QISAM 90 




GETBUF 129 


list form 17 


QSAM 107 


4 


RELSE 169 


standard form 15-16 


checkpoint records, embedded (DOS) 




forms control 174 


relationship to 


BSAM 80 




length 


buffer length (see BUFL 


CNTRL 37 




(see also BUFL operand) 


operand) 


POINT 143 




for card image mode 67,96 


number of buffers (see BUFNO 


QSAM 108 




for ASCII data sets 67,96 


operand) 


CHKPT macro instruction 




offset (see BUFOFF operand) 


Burroughs 7-track paper tape code 


execute form 29 




pool construction 


BSAM 71 


list form 27 




(see also BUFCB operand) 


QSAM 99 


standard form 23-26 




automatic (see BUFNO 




CLOSE macro instruction 




operand) 




execute form 35 




BUILD 13-14 




I/O error while executing 




BUILDRCD 15-17,19 




BDAM 49-50 




GETPOOL 131 




BISAM 56 




FREEBUF 119 




BPAM 63 
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BSAM 81-82 
QISAM 91 
QSAM 109 
list form 33-34 
relationship to 
CNTRL 37 
FREEPOOL 123 
GETPOOL 132 
PUT 147,150 
SETL 171 
standard form 31-32 
TYPE=T(BSAM) 32 
CNTRL macro instruction 
description 37-39 
restriction on use 11,37 
specified in MACRF operand 
BSAM 78 
QSAM 106 
code 
card 

BSAM 72-75 
QSAM 100-103 
completion (see code, return) 
control character (see control 

characters) 
conversion 

ASCII to EBCDIC 21,127,211 
EBCDIC to ASCII 149,205,21 1 
paper tape 71,99 
exception 213-219 
return 

BLDL 10 
BSP 11 
FIND 118 
RELEX 167 
SETPRT 175-176 
STOW 183 
SYNADAF 186 
SYNADRLS 189 
WRITE 201 
CODE operand 
BSAM 71 
QSAM 99 
coding 
aids 1 

macro instructions 2 
registers as operands 4 
restrictions for CLOSE options 32 
variable-length parameter 
lists 33,139 
column 

binary (see card image mode) 
eliminate mode, read 
BSAM 72,74 
QSAM 100,102 
completion code (see code, return) 
completion testing of I/O 

operations 21 
concatenation 

input data sets (BPAM) 57 
number 10 
condition, exception 213-219 
connect a data set, logically 135 
construct 



a data control block (see DCB 

macro instruction) 
a DECB (data event control 

block) 207 
a buffer pool (see buffer pool 
construction) 
contents of registers on entry to 
exit list 227 
SYNAD 219-220 
control 

I/O device 37-39 
page format 1 45- 1 46 
releasing of 

buff er (FREEBUF) 119 
buffer pool (FREEPOOL) 123 
data block 167 
dynamically acquired 

buffer 121 
QSAM buffer (RELSE) 169 
requesting of 

buffer (GETBUF) 129 
buffer pool 

(GETPOOL) 131-132 
data block 153 
control block 

buffer pool (see BUFCB operand) 
data (see DCB macro instruction) 
data event 213 
control characters 
ANSI 229-230 
CNTRL 37-39 
machine 229 
PRTOV 145-146 
control section (CSECT)(see DCB 

macro instruction) 
count exit, block 
BSAM 76 
format list 227 
QSAM 104 
CYLOFL (cylinder overflow area) 
operand 86 
option 90 
cylinder 
index 89 
overflow area 90 

D 

D-f ormat records 

BSAM 81 

QSAM 109 
data block 

exclusive control of 153 

locating with POINT 143-144 

release of exclusive control 167 

retrieval of 153-157,161-162 

writing of 195-206 
data checks 79,107,174 

blocking and unblocking 
of 79,107,174 

restriction with CNTRL 37 
data control block 

completing of 135 



construction of (see DCB macro 

instruction) 
description of (see DCB macro 

instruction) 
dummy section for 111-112 
exception codes 213 
exit list (see EXLST operand) 
symbolic references to 111-112 
data definition statement (see DD 

statement) 
data, end of (see EODAD operand) 
data event control block 

construction of 153,157,159,161 
description of 213 
exception code 213 
extended search option 46 
modifying with execute 

form 165,209 
requirement with CHECK 21 
requirement with FREEDBUF 121 
data management parameter 

list 35,141 
data mode 

GET 127-128 

PUT 149-150 

data protection image 

(3525) 73,75,101 
data set 

blocksize for SYSOUT 66,95 
closing of 31-35 
connection to 135-141 
disconnecting from 31-35 
disposition at close 32 
opening of 135-141 
organization (see DSORG 

operand) 
temporary closing 32 
types of (see access methods) 
data translation (see code conversion) 
data transmittal modes 
data 128,150 
locate 125,128,147,150 
move 128,147,150 
specified in DCB 88,106 
substitute 128,150 
DCB ABEND exit 
BDAM 45 
BISAM 53 
BPAM 60 
BSAM 76 
list format 227 
QISAM 86 
QSAM 104 
DCB macro instruction 
BDAM 41-50 
BISAM 51-56 
BPAM 57-63 
BSAM 65-82 
QISAM 83-91 
QSAM 93-109 
DCB operands 

description (see DCB macro 

instruction) 
symbolic names for 111-112 



Index 233 
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DCBD macro instruction 

description 111-112 
DDNAME operand 

BDAM 44 

BISAM 53 

BPAM 59 

BSAM 69 

QISAM 86 

QSAM 97-103 
DD statement, relationship to 

data control block (fee DDNAME 
operand) 

NOTE 133 

OPEN 135 

POINT 143 
deblocking records 

BDAM 41,49 

BPAM 57,63 

BSAM 65,80-81 

QISAM 90,147 

QSAM 108-109,149 
DECB (fee data event control block) 
delete option 

description 89 

effect on sequential retrieval 1 7 1 
density, recording (fee DEN operand) 
DEN operand 

BSAM 70 

QSAM 98 
DEVD operand 

BSAM 69-75 

DCBD 111-112 

QSAM 97 
device addressing, types of 

(BDAM) 47-48 
device capacities 225-226 
device types in a dummy 
section 111-112 
direct data set (fee BDAM) 
direct search option 

BSAM 79-80 

QSAM 107-108 
directory, partitioned data set 

creation 57 

obtaining contents with 
BLDL 9-10 

operations performed by 
STOW 181-183 

search by FIND 117-118 
disconnect a data set, logically 3 1-32 
disposition option 

CLOSE 32 

OPEN 136 

requirement for extending an 
ISAM data set 147 
DISP option (fee disposition option) 
DOS embedded checkpoint records 

BSAM 80 

CNTRL 37 

POINT 143 

QSAM 108 
doubleword alignment (fee BFALN 
operand) 



DPI (data protection 

image) 73,75,101 
DSECTfor 

D CB symbolic names 111-112 
DSORG operand 

BDAM 44-45 

BISAM 53 

BPAM 60 

BSAM 75 

DCBD 111-112 

QISAM 86 

QSAM 103 
dummy section (fee DSECT) 
dynamic buffering 

effect on buffer length 43,52 

effect on number of channel 
programs 55 

returning buffer to the pool 1 2 1 

E 

EBCDIC (fee extended binary coded 

decimal interchange card) 
ECB 214 
eliminate mode, read column 

BSAM 72,174 

QSAM 100,102 
embedded checkpoint records (DOS) 

BSAM 80 

CNTRL 37 

POINT 143 

QSAM 108 
end of data (fee EODAD operand) 
end of file on magnetic tape, ignoring 
of 

BSAM 80 

QSAM 108 
end of volume 

forced 115 

exit 

BSAM 76 
QSAM 104 
end sequential retrieval 1 13 
entry to 

exit routine 227 

SYNAD routine 216 
EODAD operand 

BPAM 60 

BSAM 76 

QISAM 86 

QSAM 104 
EOF on magnetic tape; ignoring of 

BSAM 80 

QSAM 108 
EROPT operand (QSAM) 104 
ERP (error recovery procedure) 

BSAM 79 

QSAM 107 
error analysis, I/O 

BDAM 49,213-221 

BISAM 56,213-221 

BPAM 63,213-221 

BSAM 81,213-221 

QISAM 91,213-221 



QSAM 109,213-221 

SYNADAF 185,213-221 
error codes (fee return codes) 
error conditions during OPEN 1 37 
error option operand (QSAM) 104 
error recovery procedure (fee ERP) 
error tape reading of (fee ERP) 
error exits 

GET 128 

PUT 148,150 

PUTX 151 
ESETL macro instruction 1 1 3 
event control block (fee ECB) 
event control block, data 

checking for I/O errors 21 

construction of 153-162,195-206 

description of 213 

exception code 2 1 3 

extended search option 46 

modifying with execute 
form 165,209 

requirement with CHECK 21 

requirement with FREEDBUF 1 2 1 
exception code 213-219 
exchange buffering 

buffer alignment for 94 

restrictions for 

record format 94 
track overflow feature 94, 1 09 
variable-length spanned 
records 109 

specified in DCB 94 
exclusive control of data block 
(BDAM) 

requesting of 153 

releasing of 167 

specified in DCB 48 
execute form instructions 

BUILDRCD 19 

CHKPT 29 

CLOSE 35 

OPEN 141 

READ 165 

SETPRT 179 

WRITE 209 
exit 

(fee also EXLST operand) 

block count 76,104 

data control block (fee EXLST 
operand) 

DCB ABEND (fee EXLST 
operand) 

end of data (fee EODAD 
operand) 

end of volume 76, 1 04 

error analysis (fee error analysis, 
I/O) 

FCB image 76,104 

list format 227 

user labeling 76, 1 04 

user totaling 76, 1 04 
EXLST operand 

BDAM 45 

BISAM 53 



C 






234 OS Data Management Macro Instructions 



^ipg^ 



o 



BPAM 60 
BSAM 76 
list format 227 
QISAM 86-87 
QSAM 104-105 
expression 

absolute (absexp) 4 
relocatable (relexp) 4 
extended binary coded decimal 
interchange code 
ASCII translation 

Check routine 21 

Get routine 127 

Put routine 149 

Write routine 199 

XL ATE macro instruction 21 1 
paper tape translation 

BSAM 71 

QSAM 99 
extended search option 

LIMCT operand (BD AM) 46 
OPTCD operand (BD AM) 48 



F-f ormat records (see RECFM 

operand) 
FCB image 
exit 76,104 
list format 227 
operand (SETPRT) 173 
feedback 

block position 48,195-196 
next address 1 54,20 1 
FEOV macro instruction 1 1 5 
file, end of (see EOF) 
final volume positioning 31,35 
FIND macro instruction 417-118 
fixed length records (see BLKSIZE 

and RECFM operands) 
format 

exit list 227 
page 145 
record 

BDAM 49 
BPAM 62-63 
BSAM 80-81 
QISAM 90 
QSAM 108-109 
forms alignment 174 
forms control buffer 
description 174 
exit 227 
image 174 
forward space 39 
FREEBUF macro instruction 
description 119 
relationship to GETBUF 129 
FREEDBUF macro instruction 
description 121 
used with BISAM 54 
FREEPOOL macro instruction 
description 123 
relationship to CLOSE 31-32 



relationship to 

GETPOOL 131-132 
restriction on buffer 
alignment 123 
FRIDEN 8-track paper tape code 
BSAM 71 
QSAM 99 
full-track-index Write operation 90 
fullword boundary alignment (see 

BFALN operand) 
FUNC operand 
BSAM 73,74-75 
QSAM 101-103 



GET macro instruction 
ASCII translation 127 
data mode (QSAM) 106,128 
locate mode 

QISAM 88,125 
QSAM 106,128 
used with PUTX 151 
move mode 

QISAM 88,125 
QSAM 106,128 
restriction when using 

CNTRL 37 
restriction when using paper 
tape 106 
specified in DCB 
QISAM 88 
QSAM 106 
substitute mode (QSAM) 106,128 
relationship to 

EODAD (see EODAD 

operand) 
RELSE 106,169 
SETL 171 
Get routine exits 128 
GETBUF macro instruction 
description 129 
relationship to 
BUILD 13 
BUILDRCD 15-16 
FREEBUF 119 
GETPOOL macro instruction 
description 131-132 
relationship to 

BUFCB (see BUFCB operand) 
BUFL (see BUFL operand) 
BUFNO (see BUFNO 

operand) 
FREEPOOL 123 



H 

HIARCHY operand 

BDAM 45 

BISAM 53 

BPAM 60-61 

BSAM 76-77 

GETPOOL 132 

QISAM 87 

QSAM 105 
hierarchy of buffer pool (see 
HIARCHY operand) 
highest level master index in main 
storage 

address of 54 

size of 55 



IEBPTPCH utility program 1 
IHADCB dummy section 111 
image 

FCB (forms control buffer) 174 
UCS (universal character set) 174 
image, data protection 
BSAM 73,75 
QSAM 101 
image mode, card 
BSAM 73,75 
QSAM 101 
independent overflow area 89 
index 

cylinder 89 
highest level 
address of 54 
size of 55 
master 

number of tracks per level 89 
specif ied in MACRF 89 
space allocation for 83 
indicators, status 213,221 
initial volume positioning 135-136 
INOUT open option 136 
INPUT open option 136 
input data sets 

basic access methods, READ 
BDAM 153-155 
BISAM 161-162 
BPAM 157-158 
BSAM (read a direct data 

set) 159 
BSAM (sequential data 

set) 157-158 
testing completion of I/O 
operations 21-22 
closing 31-32 
opening 135-137 
queued access methods, GET 
QISAM 125 
QSAM 127-128 
READ or GET specified in DCB 
BDAM 47 
BISAM 54 
BPAM 61 
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BSAM 78 

QISAM 88 

QSAM 106 
input/output devices 
2540 card punch 96 
card reader and card punch 37 
control of 37 
magnetic tape 37 
printer 

CNTRL 37 

PRTOV 145-146 
input/output error analysis 
BDAM 49,213-221 
BISAM 56,213-221 
BPAM 63,213-221 
BSAM 81,213-221 
QISAM 91,213-221 
QSAM 109,213-221 
SYNADAF 185,213-221 
input/output operation 
completion of 21 
status indicators 2 1 3 ,22 1 
synchronizing I/O 21 
interface, logical record 

invoked by BUILDRCD 15 
used with GET 128 



JCL (job control language) 

DD statement, relationship to DCB 
data control block (see 
DDNAME operand) 
NOTE 133 
OPEN 135 
POINT 143 
DISP parameter for extending 

ISAM 147 
LABEL parameter to request 

ASCII translation 21 
SPACE parameter for ISAM 83 
job control language (see JCL) 

K 

key (BDAM) 

specified in DCB 47 

writing of 195-196 
key length (see KEYLEN operand) 
key position, relative (RKP) 90-91 
key, record 

PUT 147 

READ 153-162 

RKP operand 90-91 

SETL 171-172 

WRITE 195-206 
KEYLEN operand 

BDAM 45-46 

BPAM 61 

BSAM 77 

QISAM 87 



label 

(see also EXLST operand) 

exit list format 227 

input data set 115,135 

output data set 31,115,135 
LABEL parameter in DD 

statement 21 
LEAVE option 

CLOSE 31 

FEOV 115 

OPEN 135 
length 

buffer (see BUFL operand) 

record (see LRECL operand) 
levels of master index (ISAM) 89 
LIMCT operand (BDAM) 46 
line spacing, printer 

CNTRL 37 

PRTSP operand 
BSAM 71-72 
QSAM 100 
list 

directory contents (BLDL) 9 

relative address (FIND) 1 1 7 

variable-length parameter 33,139 
list address, data management 35,141 
list format, exit 227 
list form instructions 

BUILDRCD 17 

CHKPT 27 

CLOSE 33 

OPEN 139 

READ 163 

SETPRT 177 

WRITE 207 
load mode (QISAM) 83,88 
loading 

universal character set buffer 
(UCS) 174 

forms control buffer (FCB) 174 
locate mode 

GET 

QISAM 125 
QSAM 128 

PUT 

QISAM 147 
QSAM 150 

specified in DCB 
QISAM 88 
QSAM 106 
logical record length for 

(see also LRECL operand) 

GET 125,128 

PUT 147,150 

PUTX 151 
logically 

connect a data set 135-137 

disconnect a data set 3 1-32 
lower limit of sequential retrieval 

(SETL) 171 
LRECL operand 

BPAM 61 



BSAM 77 
QISAM 87-88 
QSAM 105-106 

M 

machine control characters 

BPAM 63 

BSAM 81 

description 229 

QSAM 109 
MACRF operand 

BDAM 47-48 

BISAM 54 

BPAM 61-62 

BSAM 78 

QISAM 88-89 

QSAM 106 
macro 

definition 1 

expansion 1-2 

library 1 
macro instruction coding 2 
magnetic tape 

backspace 
BSP 11 
CNTRL 37-39 

density 70,98 

final volume positioning 
(FEOV) 115 

forward space 39 

read backward 157 

recording technique 70,98 

restriction when using NOTE 1 33 

restriction when using POINT 143 

short error recovery 
procedure 79,107 
mark read mode, optical 

BSAM 74 

QSAM 102 
master index 

number of tracks per level 89 

option specified in DCB 89 
master index, highest level in main 
storage 

address of main storage area 54 

size of main storage area 55 
member, partitioned data set 

complete a list with BLDL 9-10 

locate beginning with FIND 1 17 

update directory with 
STOW 181-183 
mode 

(see also MACRF operand) 

card image 
BSAM 72 
QSAM 100 

data (QSAM) 128,150 

load (QISAM) 83,88 

locate 

QISAM 125,147 
QSAM 128,150 

move 

QISAM 88,125,147 
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QSAM 106,128,150 

read column eliminate 
BSAM 72,74 
QSAM 100 

resume load 83,88 

scan(QISAM) 83,88 

substitute (QSAM) 128,150 
MODE operand 

BSAM 72,74 

QSAM 100 
modifying a parameter list 

BUILDRCD 19 

CLOSE 35 

OPEN 141 

READ 165 

SETPRT 179 

WRITE 209 
move mode 

QISAM 88,125,147 

QSAM 106,128,150 
MSHI operand 54 
MSWA operand 54-55 
multi-line print option 

BSAM 73 

QSAM 101 

N 

National Cash Register 8-track paper 
tape code 

BSAM 71 

QSAM 99 
NCP operand 

BIS AM 55 

BPAM 62 

BSAM 78 
next address feedback 

BDAM (creating) 196 

BDAM (existing) 154 
non-sequential processing of 

sequential data 65 
NOTE macro instruction 

description 133 

restriction when using BSP 11 

specified in DCB for BSAM 78 

used with BPAM 61 
NTM operand (QISAM) 89 
number of channel programs (see 

NCP operand) 
number of tracks per index level (see 
NTM operand) 

O 

online printer 

control 37-39,230 

skipping 145,230 

spacing 145,230 
open operation, testing of 137 
open options 136 
OPEN macro instruction 

execute form 141 

list form 139 

relationship to 

CLOSE TYPE=T 31-32 



FEOV 115 
GETPOOL 131 
NOTE 133 
POINT 143 
standard form 135-137 
OPTCD operand 
BDAM 48-49 
BPAM 62 
BSAM 79-80 
QISAM 89-90 
QSAM 107-108 
SETPRT 174-175 
option codes (see OPTCD operand) 
organization, data set (see access 

methods) 
OUTIN open option 136 
output data sets 

basic access methods 
BDAM (creating with 

BSAM) 201-203 
BDAM (existing) 195-197 
BPAM 199-200 
BSAM 199-200 
closing 31-32 
opening 135-137 
queued access methods 
QISAM 147-148 
QSAM 149-150 
WRITE or PUT specified in DCB 
BDAM 47 
BPAM 61 
BSAM 78 
QISAM 88 
QSAM 106 
writing an input record in an output 

data set using 
PUTX 151 
OUTPUT open option 136 
overflow 
area 

cylinder 86,90 
independent 89 
channel 145 

exit address (PRTOV) 145-146 
printer carriage 145-146 
records (see overflow area) 
overflow feature, track 
BDAM 49 
BPAM 63 
BSAM 81 
QSAM 109 
overprinting 145 



paper tape codes 

BSAM 71 

QSAM 99 
parameter list, construction 

BUILDRCD 17 

CLOSE 33 

OPEN 139 

READ 163 

SETPRT 177 



WRITE 207 
parameter list, modification 
BUILDRCD 19 
CLOSE 35 
OPEN 141 
READ 165 
SETPRT 179 
WRITE 209 
partitioned data set 
DCB for 57-63 
macro instructions available 

for 223 
relationship to 
BLDL 9 
FIND 117 
STOW 181 
POINT macro instruction 
description 143-144 
relationship to 
BSP 11 
BPAM 61 
BSAM 65 
pool construction, buffer 
(see also BUFCB operand) 
automatic (see BUFNO operand) 
BUILD 13-14 
BUILDRCD 15-16 
GETPOOL 131-132 
position, relative key (RKP) 90-91 
position feedback 

current block 153,195-196 
next block 154,195-196 
positioning volumes 
CLOSE 31-32 
FEOV 115 
OPEN 135-137 
prefix, block 
BSAM 68 
QSAM 96 
relationship to 

buffer length 67,96 
data alignment 65,84 
print options (3525) 
BSAM 73 
QSAM 101 
printer 

carriage control 37,229-230 
character set buffer loading 174 
control characters 229-230 
control tape 145-146 
forms control buffer loading 174 
skipping 37,230 
spacing 37,230 
program, channel 
BISAM 55 
BPAM 62 
BSAM 78 
protect option, data 
BSAM 73 
QSAM 101 
PRTOV macro instruction 145-146 
PRTSP operand 
BSAM 71-72 
QSAM 100 



Index 237 



punch, card 73,100 
PUT macro instruction 149-150 
data mode (QSAM) 150 
locate mode 
QISAM 147 
QSAM 150 
move mode 
QISAM 147 
QSAM 150 
specified in DCB 
QISAM 88 
QSAM 106 
substitute mode 150 
PUTX macro instruction 89, 1 5 1 



QISAM (queued indexed sequential 
access method) 
DCB for 83-91 
macro instructions available 
for 223 
QSAM (queued sequential access 
method) 
DCB for 93-109 
macro instructions available 
for 223 
queued access technique (pee QISAM 
and QSAM) 



RDBACK open option 136 
read backward, magnetic tape 157 
read column eliminate mode 
BSAM 72,74 
QSAM 100,102 
READ macro instruction 
execute form 165 
list form 163 
relationship to 
CHECK 21 

EODAD 60,76 
FIND 117 
FREEDBUF 121 
LIMCT 46 
NCP 55,62,78 
POINT 143 
RELEX 167 
specified in DCB 
BDAM 47 
BISAM 54 
BPAM 61 
BSAM 78 
standard form 
BDAM 153-155 
BISAM 161-162 
BPAM 157-158 
BSAM (read direct data 

set) 159 
BSAM (read sequential data 
set) 157-158 
RECFM operand 
BDAM 49 
BPAM 62-63 



BSAM 80-81 

QISAM 90 

QSAM 108-109 
record 

area 

construction 15-16 
deletion option (ISAM 89 
descriptor word (see LRECL 
operand) 
format (pee RECFM operand) 
length (pee LRECL operand) 

physical (pee BLKSIZE operand) 
GET 125,127 
PUT 147,149 

READ 161 

retrieval 127,127 

segment 127,149 

variable-spanned 15,159 

write 205 
recording density, magnetic tape 

BSAM 70 

QSAM 98 
recording technique, magnetic tape 

BSAM 70 

QSAM 98 
register 

contents on entry to 
DCB exit routine 227 
overflow exit routine 145 
SYNAD routine 219-220 

DCBDbase 111 

usage rules 4 
relative addressing 

BDAM 48 

FIND 117 

POINT 143 
relative key position 90-91 
release 

buffer 119,121,169 

buffer pool 123 

dynamically acquired buffer 121 

exclusive control 1 67 

QSAM buffer 169 
RELEX macro instruction 167 
relexp defined 4 
relocatable expression defined 4 
RELSE macro instruction 169 
REREAD option 

CLOSE 31-32 

FEOV 115 

OPEN 136 
restore data control block 3 1 
resume load mode 83,88 
return codes 

BLDL 10 

BSP 11 

CHKPT 25-26 

FIND 118 

RELEX 167 

SETPRT 175-176 

STOW 183 

SYNAD AF 186 

SYNADRLS 189 

WRITE 203 



return from error analysis routine 

BDAM 49 

BISAM 56 

BPAM 63 

BSAM 81 

QISAM 91 

QSAM 109 
REWIND close option 31 
RKP operand 90-91 



save area 

requirement for 4 

SYNAD AF requirement 185 

SYNADRLS 189 
scan mode 83,88 
search 

direct option 80,108 

partitioned data set directory 
BLDL 9 
FIND 117 
search option, extended 48 
sequential access methods (pee access 

methods) 
services, optional (OPTCD) 

BDAM 48 

BPAM 62 

BSAM 79 

QISAM 89-90 

QSAM 107 

SETPRT 174 
SETL macro instruction 

description 171-172 

ESETL 113 

GET 125 
SETPRT macro instruction 

execute form 179 

list form 177 

standard form 173-176 
skipping, printer 

(pee also spacing, printer) 

CNTRL 37 

control characters 229 
SMSI operand 55 
SMSW operand 55-56 
space allocation, data set 

BPAM 57 

QISAM 83 
space, magnetic tape 

backward 11,37-39 

forward 37-39 
spacing, printer 

(pee also skipping, printer) 

CNTRL 37-39 

control characters 229-230 

specified in DCB 
BSAM 71-72 
QSAM 100 
STACK operand 

BSAM 72,174 

QSAM 100,102 
stacker selection 

CNTRL 37-39 
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control characters 229-230 
specified in DCB 
BSAM 72,174 
QSAM 100,102 
status 

following an I/O 

operation 213-221 
indicators 221 
STOW macro instruction 181-183 
substitute mode 
GET 128 
PUT 150 

specified in DCB 106 

switching volumes 

CLOSE 31 

FEOV 115 

symbol defined 3 

SYNAD operand 

(see also error analysis (I/O) 
BDAM 49-50 
BISAM 56 
BPAM 63 
BSAM 81-82 
QISAM 91 
QSAM 109 
SYNAD AF macro 

instruction 185-187 
SYNADRLS macro instruction 189 
synchronizing I/O operations 21 
synchronous error exit (see SYNAD 

operand) 
SYSIN restrictions for CNTRL 37 



tape codes, paper 
BSAM 71 

QSAM 99 
tape density, magnetic 

BSAM 70 

QSAM 98 
tape error recovery procedure 

BSAM 79-80 

QSAM 107-108 
tape recording technique 

BSAM 70 

QSAM 98 
teletype 5-track paper tape code 

BSAM 71 

QSAM 99 
temporary close of data set 31-32 
termination, abnormal 

Check routine 21 

end of data (see EODAD 
operand) 

uncorrectable I/O error (see 
SYNAD operand) 
testing completion of I/O 21-22 
testing for open data set 137 
totaling exit, user 

BSAM 76 

list format 227 

QSAM 104 
track addressing, relative 



BDAM 41,47 
BLDL 10 
FIND 117 
POINT 143-144 
track index write, full 90 
track overflow feature 
BDAM 49 
BPAM 63 
BSAM 81 
QSAM 109 
restrictions 

chained scheduling 63 , 1 09 
exchange buffering 94, 1 09 
ISAM 81 

variable-length spanned 
records 109 
translation 

ASCII to EBCDIC 21,127,211 
EBCDIC to ASCII 149,199,211 
paper tape code 71,99 
transmittal modes 

(see also MACRF operand) 
data 128,150 
locate 125,128,147,150 
move 125,128,147,150 
substitute 128,150 
TRTCH operand 
BSAM 70-71 
QSAM 99 
TRUNC macro instruction 191 
truncating a block 191 
TYPE=T 31-32 

u 

U-format records 
BDAM 49 
BPAM 63 
BSAM 81 
QSAM 109 
UCS operand 173 
uncorrectable I/O errors (see 

SYNAD operand) 
undefined length records (see 

U-format records) 
universal character set (see UCS 

operand) 
unmovable data sets (see DSORG 

operand) 
UPD AT open option 136 
update 

mode 151 

partitioned data set directory 1 8 1 
user 

data in partitioned data set 
directory 
BLDL 9 
STOW 181 
label exit 
BSAM 79 
list format 227 
QSAM 104 
totaling exit 
BSAM 79 



list format 227 

QSAM 104 
USING statement requirement 
DCBD 101 
macro expansions 4 



V-f ormat records 
BDAM 49 
BPAM 63 
BSAM 78 
QISAM 81 
QSAM 109 
validity checking, write 
BDAM 48 
BPAM 62 
BSAM 79 
QISAM 90 
QSAM 107 
variable-length parameter list 33,139 
variable-length records (see V-format 

records) 
variable-length spanned records 
BDAM 42 
BSAM 67,159 
QSAM 127,149 
volume, force end of 115 
volume positioning 
CLOSE 31 
FEOV 115 
OPEN 135 
POINT 143 

w 

WAIT macro instruction 193-194 
work area for BISAM 
address of 54 
size of 55 
WRITE macro instruction 
execute form 209 
list form 207 
relationship to 

CHECK 21 

NCP 55,62,78 

RELEX 167 
specified in DCB 

BDAM 47 

BISAM 54 

BPAM 61 

BSAM 78 
standard form 

BDAM (create with 
BSAM) 201-203 

BDAM (existing) 195-197 

BISAM 205-206 

BPAM 199-200 

BSAM 199-200 
testing for completion 2 1 -22 



XL ATE macro instruction 21 1 
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If you would like a reply, please provide your name, job title, and business 
address (including ZIP code). 
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: Fold on two lines, staple, and mail. No postage necessary if mailed in the U.S.A. (Elsewhere, 
: any IBM representative will be happy to forward your comments.) Thank you tor your 
: cooperation. 
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Data Processing Division 
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San Jose, California 



Business Reply Mail 

No postage necessary if mailed in the U.S.A. 



Postage will be paid by: 

IBM Corporation 
Programming Center -Publishing 
Department D58 
Monterey and Cottle Roads 
San Jose, California 95193 
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IBM World Trade Corporation 

821 United Nations Plaza, New York, New York 10017 

(International) 



